BEGIN { eval { require strict }; if ($@) { warn("Cannot 'use strict', it appears to be missing\n"); } else { strict->import(); } }