Select Code to Download

use strict;
use warnings;
...
}
close FILE or die 'Could not close file';
print (values \%hashofstates);

perl prog.pl
Global symbol "$hashpfstates" requires explicit package name