perl -aF, -pli.bak -e "$_ = qq(@F[1,0])" test.txt