Select Code to Download

[mylibrary1.pl]

...
   my $number = shift;
   return $number / 2;
}

[mylibrary1.pm]

...

1; # All .pm files must end with a true value
__END__

[myscript.pl]

require 'mylibrary1.pl';

print half( 10 ), "\n";

[myscript.pl]

use mylibrary1 qw( half );

print half( 10 ), "\n";

use Foo; # Imports everything in @EXPORT, nothing in @EXPORT_OK

use Foo 'bar'; # Imports 'bar' if it's in @EXPORT_OK. Imports nothing 
+from @EXPORT

use Foo (); # Imports NOTHING from either.