Are you sure you copied the code correctly? You have a sub in Module.pm named routine but your main code is calling something named routineName. routine is printing a variable named $strng that isn't defined anywhere. Did you mean to be trying to print $variableName instead of $strng?