Линии, считанные из файла с оператором readline (<...>
), будут содержать символ новой строки. Вам нужно будет удалить его, иначе вы попытаетесь удалить файл с именем "myfile.txt\n"
вместо "myfile.txt"
. Используйте функцию chomp
Perl для обрезки вашего ввода:
foreach $line (@data){
chomp($line);
unlink($line);
}