Perl - lib::relative というのを書いた

use FindBin qw($Bin);
use lib ("$Bin/extlib/perl5", "$Bin/lib");

use lib::relative qw(extlib/lib/perl5 lib);

のようにかけるモジュールを作ってみた。

.... というか既にこのようなモジュールあるのかもしれない。