Help for this page

Select Code to Download


  1. or download this
    use constant RECS => 1000000;
{
...
    }
    Storable::nstore(\@addresses, "/tmp/bla.st");
}
  2. or download this
    $ ( set time = ( 0 "%U+%S %E %MK" ) ; time perl -MStorable -e 'retriev
+e "/tmp/bla.st"' )
1.980+0.384 0:02.41 193974K
$ ( set time = ( 0 "%U+%S %E %MK" ) ; time perl -MXML::LibXML -e 'XML:
+:LibXML->new->parse_file("/tmp/bla.xml")->documentElement' )
6.037+1.876 0:08.15 643952K