Help for this page
my $ptf_filename; ... ... } return $ptf_filename;
>perl -wMstrict -le "my $x = 1; ... " "my" variable $x masks earlier declaration in same scope at ... Use of uninitialized value $x in print at ...