# hello.pl # - Displays a warm greeting # - Puts; print, string-variables, chomp and clear to practice system("clear"); print "\n What is thy name?\n\n\nYour reply:"; my $name = ; chomp ($name); system("clear"); print "\n and From whence dosth thou hail?\n\n\nYour reply:"; my $usrhomerealm = ; chomp ($usrhomerealm); system("clear"); print "\n ah, Salutations $name of $usrhomerealm!\n\n\n";