use File::Spec;
use Config;

sub MY::post_initialize {
  my $sInc = File::Spec->rel2abs('inc', $ENV{PWD});
  my $sSep = $Config{path_sep};
  my $PERL5LIB=$ENV{PERL5LIB};
    return "PERL5LIB := $PERL5LIB$sSep$sInc";
}