in reply to Re^3: Howto Call Package from a Subdirectory
in thread Howto Call Package from a Subdirectory

I now use this (only tested on Linux): 

our $RealBin;

BEGIN {
    use File::Basename 'dirname';
    use File::Spec::Functions 'rel2abs';
    $RealBin = rel2abs( dirname( __FILE__ ) );
}

use lib "$RealBin/lib";

[download]

In Section Seekers of Perl Wisdom