BEGIN {
    require DynaLoader;
    # no strict 'refs';
    no warnings 'redefine';
    my $keep = \&DynaLoader::dl_load_file;
    *DynaLoader::dl_load_file = sub {
        my ( $path, $flags ) = @_;
        warn "We should check '$path' here";
        &$keep(@_);
    };
}

# Random XS based core modules
use Cwd;
use Fcntl;
use Digest::MD5;