# Swap the 3rd and 4th columns.
splice(@$_, 2, 0, splice(@$_, 3, 1))
   foreach @$rows;