# choroba's input generator, 990 MB
# https://perlmonks.org/?node_id=11164445
# perl gen_input.pl > big

use strict;
use warnings;

for (1..100_000_000) {
  print int(rand 2)
    ? "xyzabcd" 
    : ("mul(" . int(rand 5000) . "," . int(rand 5000) . ")");
  print "\n" unless int rand 10;
}

##</code><code>##

Perl   4.395s
Found 1999533 matches.

Python 2.262s
Found 1999533 matches.

##</code><code>##

Perl   4.422s
Found 1999533 matches.

Python 2.247s
Found 1999533 matches.