#!/usr/local/bin/perl
use strict;
use warnings;
use lib ("/Users/jimk/tmp/First/lib");
use First;

print "Hello, world\n";

##</code><code>##

#!/usr/local/bin/perl
BEGIN: {
    unshift @INC, qq{/Users/jimk/tmp/First/lib};
}
print "$_\n" for @INC;
use strict;
use warnings;

print "Hello, world\n";

##</code><code>##

/Users/jimk/tmp/First/lib
/usr/local/lib/perl5/5.8.8/darwin-2level
/usr/local/lib/perl5/5.8.8
...
.
Hello, world

##</code><code>##

#!/usr/local/bin/perl
BEGIN: {
    unshift @INC, qq{/Users/jimk/tmp/First/lib};
}
print "$_\n" for @INC;
use strict;
use warnings;
use First;

print "Hello, world\n";

##</code><code>##

Can't locate First.pm in @INC (@INC contains: /usr/local/lib/perl5/5.8.8/darwin-2level /usr/local/lib/perl5/5.8.8 
...
 .) at inc.pl line 8.
BEGIN failed--compilation aborted at inc.pl line 8.