... | perl -pale '$_=join "|",$F[1],$F[0]'