Login
7 branches 0 tags
Ben (X13/Arch) Removed string/write/c be84da7 3 years ago 835 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";