Perl> sub it{ say 'hi' };;

Perl> sub getIt{ return *it; };;

Perl> my $glob = getIt(); $glob->();;
hi

Perl> getIt()->();;
hi