Login
7 branches 0 tags
Ben (X13/Arch) Removed some old stuff 0b16f32 2 years ago 1189 Commits
nujel / benchmark / for / perl.pl
#!/usr/bin/env perl
use warnings;
use strict;

my $ret = 0;
for(my $i = 0; $i< 10000000; $i++){
  $ret = $ret + $i;
}
print "This results in $ret";