Help for this page

Select Code to Download

Select or download this

  DB<8> $_ = "105 106 107 108 109 110 111 112 113 213 214";

  DB<9> s[\s?(\d+)\d\d\K\s(?=(\d+)\d\d\s?)]{$1 + 1 == $2 ? "\n" : ' '}
+ge;
...
0  '105 106 107 108 109 110 111 112 113
213 214'
  DB<11>

Select or download this
$_ = qw /105 106 107 108 109 110 111 112 113 313 314/;