$g = sub { $n++ };