$ perl -Mstrict -Mwarnings -E '
    say "Hello, world!";
    populate_nums();
    report_nums();
    my @nums;
    sub populate_nums { push @nums => 0 .. 9 }
    sub report_nums { say "@nums" }
'
Hello, world!
0 1 2 3 4 5 6 7 8 9

##</code><code>##

$ perl -Mstrict -Mwarnings -E '
    say "Hello, world!";
    populate_nums();
    report_nums();
    my @nums;
    sub populate_nums { push @nums => 0 .. 9 }
    sub report_nums { my @nums; say "@nums" }
'
Hello, world!