in reply to Syntax to call a subroutine from a reference

You have to define the given subroutines: 
# Your code here ...

sub pingtest { print "I'm pingtest sub\n" }
sub remdial  { print "I'm remdial sub\n"  }

[download]
You may want to see perlsub.


In Section Seekers of Perl Wisdom