lib/SQL/Abstract/_TempExtlib.pm

   1 package # hide from the pauses
   2   SQL::Abstract::_TempExtlib;
   3
   4 use strict;
   5 use warnings;
   6 use File::Spec;
   7
   8 our ($HERE) = File::Spec->rel2abs(
   9   File::Spec->catdir( (File::Spec->splitpath(__FILE__))[1], '_TempExtlib' )
  10 ) =~ /^(.*)$/; # screw you, taint mode
  11
  12 unshift @INC, $HERE;
  13
  14 1;