if (-d $directory)
  {
    #continue processing
  }
  elsif (SOMETHING) #if it is a shortcut
  {
    print "$directory is a shortcut.  Will not process.";
  }
  else
  {
    print "$directory does not exist";
  }