Re: [OT] Python oder Perl

[Harald Weidner <hweidner-lists@gmx.net>]

Hallo,

[Python]
>>import os
>>list = os.listdir('/tmp')
>>for filename in list:
>>    print filename,
>>    if os.path.isdir(filename):
>>        print "is a directory"
>>    else:
>>        print "is a regular file"

[Ruby]
>dir = Dir.new('/tmp')
>dir.each { |filename|
>    print filename
>    if filename.stat.directory?
>        print "is a directory"
>    else
>        print "is a regular file"
>    end
>}

Und hier der Vollständigkeit halber das gleiche in Perl.

opendir(LIST, "/tmp");
while(defined($filename = readdir LIST)) {
  print $filename;
  if(-d "/tmp/$filename") {
    print " is a directory.\n";
  } else {
    print " is a regular file.\n";
  }
}
closedir(LIST);

Gruß, Harald