package My;
use warnings;
use strict;

our $counter //= 10;
++$counter