use strict;
use warnings;

my @results;

for my $wibble (0 .. 4) {
    for my $wobble (0 .. 4) {
        my $result1 = `/home/devel/test1.ksh $wibble`;
        my $result2 = `/home/devel/test2.ksh $wibble`;
        push @{$results[$wibble][$wobble]}, "$result1;$result2";
    }
}