Help for this page
use File::Find::Rule; my $root_in = "E:/PGPTool/dept/AIS/dropbox"; ... foreach (@ARGV) { print "$_\n"; }
glob ("'$root_in/$_'"), @ARGV;