Help for this page
perl -e 'foreach $index (reverse( 5..9 ), 12..18) { print "$index\n" } +' ... perl -e 'print "$_\n" for reverse( 5..9 ), 12..18'