FindBin + File::Spec

use FindBin;
use File::Spec;
use lib File::Spec->catfile($FindBin::Bin, 'lib');

use FileSanitiser;

• Or:

use FindBin;
use File::Spec::Functions;
use lib catfile($FindBin::Bin, 'lib');

use FileSanitiser;