if( system( '/usr/bin/sort', '-o', $filename, $filename )) {
    my $exit = $? >> 8;
    my $sig  = $? & 127;
    my $core = $? & 128;

    die "failed to sort $filename: exit code $exit, signal $sig, core? $core\n";
  }