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); },
};