in reply to pass value to sub

find( sub { unzipfiles( $var ) }, $ARGV[0] );

  • In general, if you think something isn't in Perl, try it out, because it usually is. :-)
  • "What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against?"