perldl> p $even_rows = $piddle(:,0:-1:2);