Select Code to Download

use strict;
use warnings;
...
}

print "@result";

[1 2 3 4 5 6 7 8], [3 5 6], [3 8], [1 7 8]
1 1 2 3 3 3 4 5 5 6 6 7 7 8 8 8