my $var = "foo";
&$var();   # now sub foo is called;

$var = "bar";
&$var();   # now sub bar is called;

sub foo {
    print "foo answering";
}

sub bar {
    print "bar answering";
}