perl -Mlib=. -MFoo::Bar -e 'print barfoo("blah");'

##</code><code>##

use lib '.';

##</code><code>##

perl -I. -e 'print join("\n", @INC)'

##</code><code>##

./5.8.3/i386-linux-thread-multi
./5.8.3
./i386-linux-thread-multi
./5.8.2
./5.8.1
./5.8.0
.