Front page | perl.perl5.porters |
Postings from November 1999
Euphoria
Thread Previous
|
Thread Next
From:
simon
Date:
November 29, 1999 01:50
Subject:
Euphoria
Message ID:
slrn844j3a.1eh.simon@othersideofthe.earth.li
As seen on today's Freshmeat:
Euphoria Programming Language v2.2 for Linux, 32-bit Windows and
32-bit extended DOS. It is simple, flexible, and easy to learn and
outperforms all popular interpreted languages.
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Whoa there!
I haven't enough tuits to do serious stress-testing, but here's an
inkling:
---------------
% time ./lines bigwords
lines nb-lines nb-nc-lines chars
314337 314337 314337 3244879 bigwords
./lines bigwords 1.03s user 0.05s system 100% cpu 1.075 total
% time ./lines.pl bigwords
lines nb-lines nb-nc-lines chars
314337 314337 314337 3244879 bigwords
perl lines.pl bigwords 2.27s user 0.03s system 99% cpu 2.307 total
% wc -l lines.ex lines.pl
109 lines.ex
4 lines.pl
% cat lines.pl
#!/usr/bin/perl -n
BEGIN {$save=$ARGV[0];print "lines nb-lines nb-nc-lines chars\n"}
$lines++; $nb++ if /\S/; $nbnclines++ unless /^--/; $chars+=length;
END { print "$lines\t$nb\t$nbnclines\t$chars\t$save\n" }
---------------
It may be verbose, but for an interpreted language, it's damned quick.
But no source.
--
Do not underestimate the value of print statements for debugging.
Thread Previous
|
Thread Next