Select Code to Download

$_->{$.};s:.?(.)..(.):print(($1..$2)[9,0,15,7]):e

$_->[/^(?>(.)?(.)+.*)(?!\1)(??{print(($1..$2)[9,0,15,7])})/]