{
   print("norm: ");
   local $_ = 'fred';
   for (; /./g ; print("<$&>"),1) {      }
   print("\n");
}
{
   print("next: ");
   local $_ = 'fred';
   for (; /./g ; print("<$&>"),1) { next }
   print("\n");
}