use vars qw/$RealDir/;
BEGIN{
  $0 =~ m/(.*\/)/;#location of this file
  $RealDir = $1 . "libs";
};
use lib "$RealDir";