# skip zeroth element
for(@out[1..$#out]) {
    print join ',', @$_, "\n";
}