my @fields = qw(total_jobs ... retried_jobs);
    ...
    foreach my $key ( @fields ) {
        my $val = $hash{$key};
        print OUT "$val|";
    }