foreach(@a){$_+=1;};

real	0m4.941s
user	0m1.096s
sys	0m3.604s