system(" cat $file | sort -t\\| +1 -2 > $file.out ") or warn "sort failed $!\n";