@mda = map {
   [$one[$_-1], $two[$_-1]]
} 1..@one;