BEGIN {
    my  $foo = 'foom';
    use lib $foo;
}

##</code><code>##

    my  $foo;
BEGIN {  $foo = 'foom'; }
    use lib $foo;
    printf "executing:  '%s'\n", join("', '", @INC );

##</code><code>##

BEGIN {  our $foo = 'foom';  }
    use lib $foo;