[Moscow.pm] Perl + JavaScript

[Andrew Shitov]

Круто, спасибо!

perl alex.js
0
1
4
9
16
25
36
49
64
81



2008/11/21 Alex Kapranoff <alex на kapranoff.ru>:
> Раскопал свой трёхгодичной давности скрипт, которым я пытался тестировать
> разные яваскриптовые конструкции (см. ниже). Вполне до сих пор работает.
> JavaScript::SpiderMonkey поставлен из портов FreeBSD, соответственно
> библиотека скачалась и поставилась сама.
>
> #! /usr/bin/perl -w
> use strict;
>
> use JavaScript::SpiderMonkey;
>
> my $js = new JavaScript::SpiderMonkey;
>
> $js->init;
>
> $js->function_set(kap => sub { print @_, "\n" });
>
> $js->eval(<<'EOJS');
> var funcs = [];
> for (var i = 0; i < 10; ++i) {
>    var j =i;
>    funcs.push(function(){ kap(i * i) });
> }
>
> for (var i in funcs) {
>    funcs[i]();
> }
> EOJS
>
> Andrew Shitov wrote:
>>
>> Привет!
>>
>> А кто-нить пробовал выполнять JavaScript перлом?
>>
>> Я хотел использоваться родную мозилловскую libjs, для которой на спане
>> есть интерфейс JavaScript.pm. Но он ваще не собирается. Есть еще
>> модуль JavaScript::Engine, но его как-то не хочется, потому что это
>> "Pure Perl", а не libjs.
>>
>
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>



-- 
Andrew Shitov
______________________________________________________________________
andy на shitov.ru | http://shitov.ru