perl -e 'foreach $index (5..9, 12..18) { print "$index\n" }'

##</code><code>##

perl -e 'foreach $index (9..5, 12..18) { print "$index\n" }'