my $status = system(" cat $file | sort -t\\| +1 -2 > $file.out ");
print STDERR $status;