hello ('Hello', 'world'); sub hello { my $hi = shift; my $place = shift; print "$hi $place\n"; }