Select Code to Download

use Cwd qw(chdir);

...
   @output = system ("ls -l $file");
   print "YES, Link is present" if $_ =~ /\-\>/ ; 
}

Processing atp
 ..
...

post_REFERENCED_to_EXPERIMENTAL: No such file or directory