Введение в Perl



Пример 15



Пример 15

while(<*.pl>) { print;}; # То же что и ls *.pl @files = <*>; # Массив @files содержит имена файлов в директории

но лучше сделать: @files = glob("*"); т.к. внутри скобок можно использовать переменные.



- Начало - - Назад - - Вперед -