ywindish/gist:2155294

## gistfile1.pl
# http://codepad.org/Ee48yTys

use Benchmark;
$t0 = new Benchmark;

for (1..1000000) {}

$t1 = new Benchmark;
$td = timediff($t1, $t0);
print "the code took:",timestr($td),"\n";
	# http://codepad.org/Ee48yTys

	use Benchmark;
	$t0 = new Benchmark;

	for (1..1000000) {}

	$t1 = new Benchmark;
	$td = timediff($t1, $t0);
	print "the code took:",timestr($td),"\n";