print "removing $_\n"; 
    unlink; 

##</code><code>##

  print "removing $_: ";
  print unlink $_ ? "$!\n" : "ok\n";