История изменений
Исправление KennyMinigun, (текущая версия) :
Если и делать такую наркоманию, то заранее пытаться приводить ее к виду скриптоты. Скажем Perl:
my $dir = $path;
-d $dir or die "$dir is not a directory";
opendir my $dh, $dir;
for my $file (readdir $dh) {
open(my $fh, '<', File::Spec->catfile($dir, $file))
or die "Cannot open $file for reading";
# ...
}
closedir $dh;Хотя... на второй взгляд не такой уж С++/Qt и многословный. Но в перле можно еще glob заюзать.
Исходная версия KennyMinigun, :
Если и делать такую наркоманию, то заранее пытаться приводить ее к виду скриптоты. Скажем Perl:
my $dir = $path;
-d $dir or die "$dir is not a directory";
opendir my $dh, $dir;
for my $file (readdir $dh) {
open(my $fh, '<', File::Spec->catfile($dir, $file))
or die "Cannot open $file for reading";
# ...
}
closedir $dh;Хотя... на второй взгляд не такой уж С++/Qt и многословный.