Thread Dateitest (3 answers)
Opened by alexus-777 at 2004-04-26 23:28

Dubu
 2004-04-27 12:11
#81870 #81870
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image
Code: (dl )
1
2
3
if (-e $datei && -f _ && -r _ && -x _) {
...
}

Das '_' ist dabei Shortcut fuer die letzte getestete Datei (bzw. Dateihandle).

Bei mehr Tests wuerde ich aber esskars Vorschlag bevorzugen. Beides kann man aber auch kombinieren (vgl. perldoc -f -X):
Code: (dl )
1
2
3
4
5
6
7
8
9
stat($datei);
                  print "Lesbar\n" if -r _;
                  print "Beschreibbar\n" if -w _;
                  print "Ausfuehrbar\n" if -x _;
                  print "Setuid\n" if -u _;
                  print "Setgid\n" if -g _;
                  print "Sticky\n" if -k _;
                  print "Wahrscheinlich Text\n" if -T _;
                  print "Wahrscheinlich binaer\n" if -B _;

View full thread Dateitest