Я дважды пытался открыть файл .gz, и скрипт завис. Ниже приведен код:
open(my $file, '-|', '/usr/bin/gzip -dc file.gz') or die $!;
...
close $file;
print "File closed\n";
system 'pwd';
print "opening file\n";
open(my $file2, '-|', '/usr/bin/gzip -dc file.gz') or die "couldn't open file,$!";
print "File opened\n";
close $file2;
вывод:
Файл закрыт
Открытие файла
Я хочу открыть файл и прочитать его снова. Я не могу увидеть печать "Файл открыт". В чем может быть причина?