Select Code to Download

package printname;

...


1;

#!/usr/bin/perl

...
use printname;

printname("John");

C:\Scripts>perl  testmodule.pl
Use of uninitialized value $name in concatenation (.) or string at C:/
+Perl64/lib/printname/printname.pm line 12.

Hello,
Undefined subroutine &main::printname called at testmodule.pl line 8.