Удалить. *из $ARGV, затем добавьте \t $ARGV в файл:
perl -i -pe '$ARGV=~s/\..*//; s/$/\t$ARGV/;' NA*
Решение Гленна, скорее всего, работает быстрее:
perl -i -lpe '$_.= " ". substr($ARGV,0,index($ARGV,"."))' NA*
хотя, если каждый файл состоит только из одной строки, большую часть времени поиск будет выполняться на диске.
Вы больше не можете сделать загрузочную флешку. Вам нужно купить компакт-диск сейчас и установить через компакт-диск, потому что он может запросить у вас код продукта, и если вы найдете этот код только на реальном продукте Windows, а не на подделке, которую вы устанавливаете из Интернета.