use
strict;
use
warnings;
use
Benchmark;
use
utf8;
"\n------------------------------------------------\n"
;
"small strings\n"
;
timethis(1000000,
'distance("four","fuoru");'
);
"------------------------------------------------\n"
;
"medium strings\n"
;
timethis(1000000,
'distance("four" x 1000,"fuoru" x 1000);'
);
"------------------------------------------------\n"
;
"large strings\n"
;
timethis(1000000,
'distance("four" x 100000,"fuoru" x 100000);'
);
"------------------------------------------------\n"
;