#!perl # c:/path/to/dirapp/test.pl use strict; use warnings; use FindBin; use lib $FindBin::Bin.'/myperl-lib'; use library_sub; print test();