Select Code to Download

package ECHO_MODULE;

...
sub say_hi {print "hi\n";}

sub say_bye {print "bye\n"}

-----------------------
print "enter subroutine name: ";
$subname = <STDIN>;

$subname() ????