BEGIN { unshift @INC, "." }

use strict;

print "I have: $strict::VERSION\n";

##</code><code>##

cp c:/strawberry/perl/lib/strict.pm .
perl -i.old -pe 's/VERSION = .*/VERSION = "3.45";/' strict.pm

##</code><code>##

perl C:/strawberry/perl/bin/pp -o a.exe -x a.pl
a.exe

##</code><code>##

perl C:/strawberry/perl/bin/pp -o a.exe  --lib=. a.pl
a.exe