Help for this page

Select Code to Download


  1. or download this
           Rate   old  new
    old   115/s    -- -47%
    new   215/s   87%   --
    
  2. or download this
         Rate  old  new
    old 107/s   -- -61%
    new 271/s 153%   --
    
  3. or download this
    L: 11549>external_user=demerphq&scratchpublic=%20
    L: 6902 >==01:H&DomainNodeletExtras=&allow_dupe_p
    
  4. or download this
    
    use Data::Dump::Streamer;
    ...
                  new_c => sub { my $h=unpackVars($txt); my $str=packVars(
    +$h); },
                  new => sub { my $h=unpackVars($txt); my $str=packVars($h
    +); },
                };
    
  5. or download this
    my $PackVer="==01";
    
    ...
     old => sub { my $h=getVars($NODE1); $h->{_test}++; setVars($NODE1,$h)
    +; },
     new => sub { my $h=new_getVars($NODE2); $h->{_test}++; new_setVars($N
    +ODE2,$h); },
    };