Hello, World! (with Perl-Subroutines)