$ cat foo.pl
use strict;
use warnings;

my ($unused, $i, $j);
$i = $j; # uninitialized
__END__
$ perlcritic -3 foo.pl
..
"$unused" is declared but not used. at line 4, column 1.  Unused variables clutter code and make it harder to read.  (Severity: 3)
..