Select Code to Download

#!/usr/bin/perl

...
  / $3 . reverse $2.$1.$4 /xe;

print " next is $_\n";

start at 117
 next is 171