#!/usr/bin/perl -w
BEGIN {
  $0=~s#/?[^/]*$##;
  $0 ||= '.';
  push @INC,$0.'/../perl_modules';
}
print "$_\n" for @INC;