raku-rosettacode/programming_tasks/P/Program_name.md

Program name

In Perl 6, the name of the program being executed is in the special global variable $*PROGRAM-NAME.

say $*PROGRAM-NAME;