C:\>perl -MO=Deparse test.pl
sub foo {
    print q[It's all good.];
}
my $subref = \&{'foo';};
&$subref;