print "strict module loaded... ",
      exists($INC{'strict.pm'}) ? "yes" : "no",
      "\n";

print "warnings module loaded... ",
      exists($INC{'warnings.pm'}) ? "yes" : "no",
      "\n";