Select Code to Download

#!/usr/bin/perl -wT

...

  return $filename;
}

mkdir -p blah/blah/blah/blah
touch blah/blah/foo
...
touch blah/blah/blah/bar

./test.pl blah