12345678910111213141516 package Local::Unused;use strict;use warnings;my $foo;sub bar { my $unused; my $one; my $two; my $three; my $four = 4;}1;
package
Local::Unused;
use
strict;
warnings;
my
$foo
;
sub
bar {
$unused
$one
$two
$three
$four
= 4;
}
1;