Perl:
$ cat test.pl
for ($i = 0 ; $i < 10000 ; $i++) {
unshift(@f, $i) ;
}
$ /bin/time perl test.pl
real 4.6
user 4.4
sys 0.0
VSCM:
$ cat test.scm
cat test.scm
(do ((i 0 (+ i 1))
(l '() (cons i l)))
((>= i 10000) l))
(quit)
$ /bin/time scheme test.scm
[SLIB available]
Loading "test.scm" ...
real 0.3
user 0.2
sys 0.0
$
No attempt is made to draw conclusions from the above...
-- -Matthias