use FindBin qw($Bin);
use lib "$Bin/mylib";