{ my $cnt = 1; sub get_count { return $cnt++; } } print get_count(), "\n" for 1..10;