Imawk wenn ich mehr als eine Datei als Argument gebeawkgibt es zwei spezielle Variablen:

NR= Zeilennummer, die allen Zeilen in allen Dateien entspricht.

FNR= Zeilennummer der aktuellen Datei.

Ich weiß, dass in Perl,$. entsprichtNR (aktuelle Zeile unter den Zeilen in allen Dateien).

Gibt es etwas Vergleichbares zuFNR von AWK auch in Perl?

Angenommen, ich habe eine Befehlszeile:

perl -pe 'print filename,<something special which hold the current file's line number>'  *.txt

Dies sollte mir eine Ausgabe geben wie:

file1.txt 1
file1.txt 2
file2.txt 1