eval { require "B.pl"; } if ($@) { # deal with error } ...