| stuff before

my $sref = \&foo 

| stuff after

##</code><code>##


| later

&($sref)( arg1....argn);

|

##</code><code>##

#!/usr/bin/perl -w

use strict;

my $sref=\&foo;

&{$sref};

exit(0);

sub foo {
        print "This is foo.\n";
}