A simple NQP program:

#!nqp

my $name := "Just another Perl hacker";
hello($name);

our sub hello($x) {
    say("Hello, $name");
}