Select Code to Download

my @arr;
if ( -d $ARGV[0] ) {
...
else {
  @arr = @ARGV;
}

for ( @arr ) {
  if ( -d $_ ) {
...
  }
  unlink $_;
}