my $private_subroutine = sub { 
                                 print "Hollow World\n" 
                             };

&$private_subroutine();