sub foo { for my $i (0 .. 23) { ... } } ... sub bar { for my $i (23 .. 42) { } }