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