$ cat a/strict.pm
package strict;

our $VERSION = 1.04;

sub VERSION {
    my ($module, $version) = @_;
    return $VERSION unless $version;
    until ($VERSION == $version) {
        shift @INC;
        delete $INC{"strict.pm"};
        eval " require strict; 1; ";
        $VERSION = $strict::VERSION;
    }
    return $VERSION;
}

$ cat ./strict
#!/usr/bin/perl -Wl

BEGIN {

    eval {
        local @INC = @INC;
        unshift @INC, qw|a b c|;
        eval " 
            use strict 1.03 qw|subs vars refs|; 
            1; 
        ";
        warn "$@" if $@;
    };
}

print "strict using $INC{'strict.pm'} version $strict::VERSION ";

$ ./strict 

strict using /usr/share/perl/5.8/strict.pm version 1.03