Quello che io ho scritto END e` un qualsiasi identificatore.
Quello alla fine deve essere uguale al primo e posizionato all'inizio della riga.

Viene stampato tutto quanto compreso tra la riga del print e quella dell'END.

Provare per credere.

PS conosci http://www.perldoc.com/perl5.6.1/pod/perl.html ?

Ciao
Michele