Help for this page

Select Code to Download


  1. or download this
    # the fix:
    @items = grep {
    ...
                 Rate BrowserUk      dpuu
    dpuu      10117/s       39%        --
    BrowserUk  7289/s        --      -28%
    
  2. or download this
    Benchmark: timing 100000 iterations of BrowserUk, dpuu...
     BrowserUk: 10 wallclock secs ( 9.26 usr +  0.00 sys =  9.26 CPU) @ 10
    +795.64/s (n=100000)
    ...
                 Rate      dpuu BrowserUk
    dpuu      10118/s        --       -6%
    BrowserUk 10796/s        7%        --
    
  3. or download this
    @items = grep { ++$i && !exists $del{$_} || ($index -= $i-1 <= $index)
    + && 0 } @items;