package mydir::mymod123;
sub mysub
{
  ...etc...
  return $x;
}
1;