if (grep { /\AFindBin::\z/ } keys %::) {
    print "FindBin is loaded\n";
}