Thanks for response.
EW> Looks like this one is still dangling. Did you get it solved? If so,
EW> let us know.
I still don't solve this.
EW> Now the question is whether it's an Inline::Python issue or a
EW> Benchmark.pm/perl problem. I've noticed strange behavior in recent
EW> versions of perl with certain supposedly equivalent iterator constructs
EW> for large values of $n (IIRC, something like @array = <FILE> taking
EW> much longer than my @array;foreach my $line (<FILE>) {push(@array,
EW> $line);})
This is not Benchmark.pm/perl problem. Result for same test, for
example lua:
#--------------------------------------------------------
#!/usr/bin/perl
use Inline Lua => <<'EOC';
function answer (a, b)
return a*b
end
EOC
use Benchmark;
$t = timeit(10_000_000, 'answer(6, 7)');
print timestr($t), "\n";
print 4 * (split(/\s/, `cat /proc/$$/statm`))[0], "\n";
#--------------------------------------------------------
[EMAIL PROTECTED]:~/inline# ./bench_lua.pl
47 wallclock secs (45.63 usr + -0.01 sys = 45.62 CPU) @ 219202.10/s (n=10000000)
3532
Maxim Nechaev
