sub parallel_tester { # assume neither parser modifies @_ my $old_result = old_parser(@_); my $new_result = new_parser(@_); compare_n_report($old_result, $new_result, @_); }