Da musst du aber auf Linuxers Beitrag antworten, der hat dir doch das Programm gezeigt.
Mein Hinweis bezog sich allgemein darauf, dass in Perl so eine Code-Zeile (Bandwurm) mehrzeilig geschrieben werden darf.