В моем /var/tmp
меня есть следующие файлы:
ls | grep FILE
AAA-FILE.xml
BBB-FILE.xml
С помощью следующей команды я вырезал первое слово файлов следующим образом:
ls /var/tmp | grep FILE.xml | sed "s/.FILE.*//"
Я получил:
AAA
BBB
Как я могу сделать то же самое с Perl, чтобы вставить "AAA" и "BBB" в @RESULTS? Например:
@RESULTS=perl syntax ...