Help for this page

Select Code to Download


  1. or download this
    use Parse::RecDescent;
use Date::Calc qw(:all);
use Benchmark ':all';
...
   'regex' => sub { $parser1->logic($test); },
   'quote' => sub { $parser2->logic($test); },
   });
  2. or download this
           Rate quote regex
quote 116/s    --   -5%
regex 123/s    6%    --
  3. or download this
    use Parse::RecDescent;
use Date::Calc qw(:all);
use Benchmark ':all';
...
   'regex' => sub { $parser1->logic($test); },
   'quote' => sub { $parser2->logic($test); },
   });
  4. or download this
           Rate quote regex
quote 104/s    --   -7%
regex 113/s    8%    --