sub f {
       state $once1 = log('some information') || 1;
   }