BEGIN {
  my $path = 'somepath';
  push @INC, $path;
}