use strict;
use warnings;

Run Perl::Critic on the code.