#/usr/bin/perl

use strict;
use warnings;

for my $tree ("a","b") {
    local $ENV{PERL5LIB} = $tree;
    delete $INC{'Foo.pm'};
    require Foo;
    Foo::Bar();
}