package ECHO_MODULE; use Exporter (); @ISA = qw(Exporter); @EXPORT = qw($say_hi $say_bye); sub say_hi {print "hi\n";} sub say_bye {print "bye\n"} #### ----------------------- print "enter subroutine name: "; $subname = ; $subname() ????