#! perl
use strict;
use warnings;

while (<DATA>)
{
    chomp;
    s[\s(\d+)\d\K\s(?=(\d+)\d\s)]
    {
        printf("%s: (%s) (%s)\n", $_, $1, $2);
    }ge;
}

__DATA__
105 106 107 108 109 110 111 112 113
1115 1116 1117 1118 1119 1120 1121 1122 1123
12345 12346 12347 12348 12349 12350 12351 12353