$Datei = 'E:\Projekte\test\GUI\Loeschen\killen';

     if(-d $Datei)
     {   print 'DIR';      } else  {print 'FILE';   }