#Me.pm Module)
package Me;
use strict; use warnings;
require 5.6;
require Exporter;
our @ISA=qw(Exporter);
our @EXPORT_OK=qw(hello);
sub hello {
my($name)=shift;
print "Hi there, $name.\n"
};
1;
# Program name: main.perl
#!/usr/bin/perl
use lib ("/Modules");
use Me qw(hello);
&hello ("Tom");