• 締切済み

Perlの配列をJavaScriptに渡せますか

Perlの配列を引数としてJavaScriptに渡したいのですが 出来ますか、 出来る場合のコードの書き方をお願いします。

みんなの回答

noname#199778
noname#199778
回答No.1

Perlで保持している配列のデータを、JavaScriptの構文を出力する部分でソースとして書き出すという形でなら、Perlで保持している配列のデータをJavaScript側に流すことも可能だと思います。 例えば、下記のソースでは、Perlの配列@hogeで保持しているデータを、出力するJavaScriptの構文の中に書き出すことで、Perlで持っているデータをJavaScriptに渡しています。 @hoge=('りんご','みかん','メロン'); print "<script type=\"text/javascript\"><!--\n"; print "fruits= new Array();\n\n"; $n=0; foreach $_ (@hoge){ print "fruits[$n]=\"$_\";\n"; $n++; } print "\n"; print "for (i=0; i<fruits.length; i++){\n"; print " alert(fruits[i]);\n"; print "}\n"; print "//--></script>\n"; こう言った方法であれば、可能だと思います。 参考になれば… 見当違いでしたら、ごめんなさい。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • perlでサブルーチンへの複数の配列渡し

    perlでサブルーチンに配列を渡しているのですが、 引数としている配列が1個の場合は問題ないのですが、 複数渡すと、第2引数以降が渡りません。 どの様にすれば上手くできますか。 例1 #!/usr/bin/perl @x1 = (14, 11, 5, 12, 8, 15); @x2 = (12, 10, 8, 9); print "main : @x1 \n"; &test(@x1); sub test { my (@arg1) = @_; print "sub : @arg1 \n"; } 結果 main : 14 11 5 12 8 15 sub : 14 11 5 12 8 15 例2 #!/usr/bin/perl @x1 = (14, 11, 5, 12, 8, 15); @x2 = (12, 10, 8, 9); print "main : @x1 \n"; print "main : @x2 \n"; &test(@x1, @x2); sub test { my (@arg1, @arg2) = @_; print "sub : @arg1 \n"; print "sub : @arg2 \n"; } 結果 main : 14 11 5 12 8 15 main : 12 10 8 9 sub : 14 11 5 12 8 15 12 10 8 9 sub : 引数1に全てが設定されて、引数2に設定されていない。

    • ベストアンサー
    • Perl
  • Javascript、Perlの知識とは

    アルバイトでWebサイト作成をしています。 元々HTMLや画像加工などは独学で覚え、Webデザインできるようになりましたが、もっと高度な仕事となると、JavascriptやPerlの知識があったほうがいいと言われました。現在は、JavascriptもPerlもフリーのプログラム配布サイトのものをお借りして設置する程度のことしかできません。 参考書も買ったのですが、本を見てタグを暗記しただけでどんどんできるようになるHTMLと違って、JavascriptやPerlはプログラムが難しくて、どこがゴールなのかわからず、勉強方法に困っています。 説明が難しいのですが、例えば、HTMLなら「文字に色がつけられる」「文字の大きさが変えられる」など、やることが少ないですが、JavascriptやPerlの場合、何をできるようになったら「Javascriptができる」「Perlができる」というレベルになれるのでしょうか?そういうのは本やサイトを見て独学でできるようになるのでしょうか?

    • 締切済み
    • CSS
  • JavaScript これは配列ですか

    こんにちは。JavaScriptを勉強しはじめてばかりです。 http://www.tsware.jp/download/accgmap/jscontent.htm 上記のサイトにある、書き方は配列になるのでしょうか?または配列の配列になるのでしょうか? 配列の説明は読んだのですが、上記にかかれているのは配列じゃないような気がして・・・ よろしくお願いいたします。

  • Perlで二次配列は可能?

    毎度御世話になっております。 Perlスクリプトで二次配列のような配列の使い方は可能でしょうか? (A*B)種類の変数を配列の形で操作したいと考えています。 A,B共に8~256ぐらいで、処理の途中で増やせる様にしたいのです。 連想配列を用いればそれらしいことが出来るのではないかと思ったのですが、 うまく行きません。どうかお知恵を御貸し下さい。

    • ベストアンサー
    • Perl
  • PHPの配列をjavascriptへ渡したい

    PHPの配列をjavascriptの配列に渡したいのですがやり方がわかりません。 変数の渡し方ならわかるのですが配列はどう渡せばいいのでしょうか? for文を使って渡せばいいと思うんですがどうやればいいか分かりません。 <?php $filedata=file("data.txt");//javascriptに渡したい配列 ?> <script language="javascript"> var a=new Array();//PHPの配列をこの配列に入れたい </script> 何方か教えてください。

    • ベストアンサー
    • PHP
  • javascriptからperlを読み出す方法

    javascriptで入力した情報をperlで書き込んだり、書き込んだデータを読み込んでjavascriptで表示しようと考えています。 その際にperlへどのようにすれば、データを引き渡せるか、また、その逆で読み込んだデータをperlからどうすれば取り込めるかがわかりません。 どなたか教えてください。 宜しくお願いします。

  • JavaScriptでPerlのサブルーチンを呼び出すには?

    JavaScriptでPerlのサブルーチンを呼び出すことはできますか。 #Perl Sub Func_a(){ ... } この Func_a 関数をJavaScriptから呼び出したいのです。

  • perlでの三次元配列の作り方

    perlで三次元配列をテキスト入力から作りたいのですが、例えば二次元配列の場合 foreach $line (@input) push @data, [split /[:]/, $line]; で@dataが二次元配列になるのですが、三次元配列の場合このあとに push @output, \@data; とするとリファレンスが同じであるためループをまわしてもうまく三次元になりませんよね。 解決法はありますでしょうか?

  • PerlでJavaScriptを作成しているのですが・・・

    PerlでJavaScriptを作成しているのですが、以下の部分で困っています。 たとえば、Perlの変数「$codes」に「AAA\nBBB\nCCC\n」が入っているとします。 ----------------------------------------------------------------------  print <<"END_OF_HTML";  function sample()  {   document.FORM.ele.value="$codes";  }  END_OF_HTML ---------------------------------------------------------------------- とPerlで記述すると、作成されたソースは、 ----------------------------------------------------------------------  function sample()  {   document.FORM.ele.value="AAA  BBB  CCC  ";  } ---------------------------------------------------------------------- となり、JavaScriptエラーになってしまいます。 Perlでエンコードしてから、JavaScriptでデコードしてみよう!と試してみたのですが、Perl⇔JavaScriptのエンコード/デコードがうまくいきませんでした。 (Perlでエンコードした値が、JavaScriptで元の形に戻せませんでした。わたしの能力不足です。。。) どなたか、よい方法をご存知ないでしょうか?よろしくお願いします。

    • ベストアンサー
    • Perl
  • JavaScript で配列の終わりまでループ

    JavaScript で配列の終わりまでループを回すには どうしたらいいのでしょう? perl であれば foreach (@test) {  処理 } ですよね。。。test.length; で要素数を取得する以外で 方法はないでしょうか。 new Array を使って、2次元配列(のようなもの) を 作って格納してしまったので、test[0][*], test[1][*] それぞれの要素数を調べたいのです。 現状だと test[0][*], test[1][*] 2つの合計値が 返ってしまいます。