Help for this page
#!/usr/bin/perl -w use strict; ... timethese(100_000, {join => \&joinit, slash => \&dollarslash} );
Benchmark: timing 100000 iterations of join, slash... join: 12 wallclock secs ( 9.98 usr + 1.33 sys = 11.31 CPU) slash: 6 wallclock secs ( 3.79 usr + 1.53 sys = 5.32 CPU)
www.com | www.net | www.org
No recent polls found