#!/usr/bin/perl
use strict;
use warnings;

=alternative
BEGIN {
    push ( @INC,"/home/tinyos/Monks/");
}
use My::Math qw(add);
=cut

use lib qw(/home/tinyos/Monks);
use My::Math qw(add);

my $addition = add(19, 23);
print $addition . "\n";

__DATA__

$ perl test.pl
42