use File::Basename;
use My:Ownmodule;
BEGIN
 {
  my $cwd = dirname $0;
  my $mylib = $cwd."/lib";
  unshift (@INC,$mylib);
 }