BEGIN
{
   eval
   {
      require strict;
   };
   strict->import() unless $@;
}
                                                                                
$foo = 1;