[mylibrary1.pl]

sub half {
   my $number = shift;
   return $number / 2;
}


##</code><code>##

require      Exporter;
@ISA       = qw(Exporter);
@EXPORT    = qw(half);