perl -wE 'for (1..10000) { print int(rand 2) ? "xyzabcd" : ("mul(" . int(rand 5000). "," . int(rand 5000) . ")" ) ; print "\n" unless int rand 10 }' > 1