Select Code to Download

 
#!/usr/bin/perl 

...
sub tst {
    warn "y: ",$_[0] ;
}

C:/Perl_524/bin\perl.exe  d:/tmp/pm/grep_autovivify.pl 
Use of uninitialized value $_ in warn at d:/tmp/pm/grep_autovivify.pl 
+line 13.
...
          'b',
          'a'
        ];