use strict; BEGIN{unshift (@INC,"\\mylib");} use mylib1; #### use strict; use mylib1; BEGIN{unshift (@INC,"\\mylib");}