Variable für aktuelle Zeile

[Struppi]

Hi,
gibt es in Perl eine Variable, die mir die aktuelle Zeile von meinem
Perl-script ausgibt?

print " Das Script ist derzeit in Zeile " . __LINE__;

Struppi.