$ time perl -e 'for ($x=0; $x!=100_000_000; ++$x) {}'

real	0m2.448s
user	0m2.446s
sys	0m0.002s

$ time php -r 'for($x=0; $x!=100000000; ++$x){};'

real	0m1.570s
user	0m1.562s
sys	0m0.008s