use strict;

sub f {
   # strict still in effect in this child block

   if (...) {
      # strict still in effect in this child block

      for (...) {
         # strict still in effect in this child block

         {
            # strict still in effect in this child block
         }
      }
   }
}