use strict;

my $subref = \&{'dynamic'};
&$subref();

sub dynamic 
{
    print "Mmm, dynamic.\n";
}


##</code><code>##

$bar = \&{'foo'};
&$bar;