% bleadperl -Mstrict -wE 'for $1 ( 10..13 ) { $1 =~ /^(\d)/; say $1 }'
10
11
12
13