return [ map {[$d->[$_-1],$d->[$_]]} 1..$#$d ];