{ my $static = 10; sub test1 { print $static++, "\n"; } } test1(); test1(); __OUTPUT__ 10 11