>perl -wMstrict -le
"use v5.14;
 ;;
 counter();
 counter();
 ;;
 { my $count = 42;
   ;;
   sub counter { say $count++; }
   }
 ;;
 counter();
 counter();
"
0
1
42
43