$ alias perle
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -E'
$ perle 'our $a = 25; my $ra = \*a; say $ra->*{SCALAR}->$*'
25

##</code><code>##

$ perle '1 for sort { say +(\*a)->*{PACKAGE}; say +(\*a)->*{SCALAR}->$*; say $a } 1 .. 3'
main
1
1
main
2
2