$ perl -E 'use lib sub {say "Using $_[1]"; sub {$_ = "1;"; 0}}, sub {die}; use Blah; say "Hi!";'
Using Blah.pm
Blah.pm did not return a true value at -e line 1.
BEGIN failed--compilation aborted at -e line 1.