#!/usr/bin/perl

use strict;
use warnings;
use lib sub { warn "Attempt to load `$_[1]'"; undef };
use File::Find;

__END__

##</code><code>##

$ perl foo.pl
Attempt to load `File/Find.pm' at foo.pl line 5.
Attempt to load `warnings/register.pm' at foo.pl line 5.
Attempt to load `Cwd.pm' at foo.pl line 5.
Attempt to load `vars.pm' at foo.pl line 5.
Attempt to load `XSLoader.pm' at foo.pl line 5.
Attempt to load `File/Basename.pm' at foo.pl line 5.
Attempt to load `re.pm' at foo.pl line 5.
Attempt to load `File/Spec.pm' at foo.pl line 5.
Attempt to load `File/Spec/Unix.pm' at foo.pl line 5.
Attempt to load `Scalar/Util.pm' at foo.pl line 5.
Attempt to load `List/Util.pm' at foo.pl line 5.
Attempt to load `DynaLoader.pm' at foo.pl line 5.
Attempt to load `AutoLoader.pm' at foo.pl line 5.