develooper Front page | perl.perl5.porters | Postings from April 2016

[perl #127885] [patches] enhance bench.pl to test same perl underdifferent options/args

Thread Next
From:
Tony Cook via RT
Date:
April 25, 2016 05:35
Subject:
[perl #127885] [patches] enhance bench.pl to test same perl underdifferent options/args
Message ID:
rt-4.0.18-820-1461562526-1118.127885-15-0@perl.org
On Tue Apr 12 09:35:30 2016, yoduh wrote:
> Porting/bench.pl has 2 interrelated shortcomings:
> 
> 1- it stores cachegrind results using {$testname}{$perlname}.
>    This means that if the same $perlname is used 2x, the 2nd results
>    overwrite the 1st.
> 
> 2- it cannot pass different options/args to each Perl-Under-Test.

0006-grind_print-adjust-for-labels.patch

@@ -1108,7 +1109,8 @@ sub grind_print {
     # Calculate the width to display for each column.
     my $min_width = $OPTS{raw} ? 8 : 6;
     my @widths = map { length($_) < $min_width ? $min_width : length($_) }
-                            @perl_labels{@perl_names};
+                            #@perl_labels{@perl_names};
+			    @perl_labels;
 
     # Print standard header.
     grind_blurb($perls);

left over working edit I guess.

0010-provide-per-PUT-environment.patch

+        my %env;
+        if ($env) {
+            %env = split /[=:]/, $env;
+        }

Pity I can't test PERLIO=:stdio vs PERLIO=:perlio, though I'm not sure what would be a better separator.

Other than that it all looks good.

Tony

---
via perlbug:  queue: perl5 status: new
https://rt.perl.org/Ticket/Display.html?id=127885

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About