use FindBin qw($Bin); $FindBin::Bin =~ s{/bin/lib/?$}{/bin};
use lib ($FindBin::Bin . "/lib", $ENV{HOME} . "/bin/lib");