#!/usr/bin/perl

use strict;

my $maxitems = 3;

while( <DATA> ) {
    my @numbers = split;
    my $indent = '';
    while ( @numbers > 0) {
        my @rowdata = splice(@numbers,0,$maxitems);
        print "${indent}@rowdata\n";
        $indent = '  ';
    }
}

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