package Blah;
my $a = 3;
1;