hello ('Hello', 'world');

sub hello {
    my $hi = shift;
    my $place = shift;

    print "$hi $place\n";
}

##</code><code>##

Hello world

##</code><code>##

sub hello {
    my ($hi, $place) = @_;

    print "$hi $place\n";
}

##</code><code>##

hello (hi => 'Hello', place => 'world');

sub hello {
    my %params = @_;

    print "$params{hi} $params{place}\n";
}