Public ScratchpadDownload, Select Code To D/L

Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl 
use strict ;
...
        print "\t$key \n" ;
    }
}
  2. or download this
     
#!/usr/bin/perl -w 
use Data::Dumper; 
...
    $testhash->{$v->{'filename'}} = 1; 
} 
print Dumper($testhash);
  3. or download this
    #!/usr/bin/perl 
use warnings ; # perl5 adn above
...
}

print Dumper(\@files);