opendir MYDIR, "$dir";
my @FILES = readdir MYDIR;
closedir MYDIR;
Похоже, что 99,9% времени, когда первые две записи в массиве всегда «.» И «..». Более поздняя логика в скрипте имеет пробл
Может кто-нибудь сказать мне, почему «opendir» не работает? #!/usr/bin/env perl6
use v6;
my $file = 'Dokumente/test_file';
if (my $fh = open $file, :r) {
for $fh.lines -> $line {
say $l
У меня есть имя файла logspath.txt, которые содержат путь к каталогу журналов на машине. один каталог каждая линия. Хотя каталог существует, Perl говорит, что нет. #!/usr/bin/perl -w
open FILE,"logs