【Perl 】初心者コーナーPart8
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。
01/10/24 14:11ID:???1：自分はこう言う事がしたい。
2：それでこんな風にやってみたが･･･
3：それだとこんなエラーが出て上手く行かなかった。
1と3が無いと誰も答えられないよ、良い回答は良い質問から。
一緒に勉強しましょう。
参考書籍はこちら【【Perl,CGI】参考書籍 第２版 】
http://ebi.2ch.net/test/read.cgi/php/988809842/l50
CGIの質問はこちら【ＣＧＩだけど、なんか質問ある？part４】
http://ebi.2ch.net/test/read.cgi/php/1000804655/l50
過去ログ、その他の役立ち情報は>>2-10を見よう。
0792415
01/12/20 23:53ID:wN6aMomP"\n" を chop した変数や "" を正規表現や文字列比較の際に上手くハンドルする
方法を教えてください。
1)改行だけの変数を chop したらどうなるのでしょうか？
$kaigyou = "\n";
chop $kaigyou;
if ("" == $kaigyou){
# $kaigyou の中身はどうなっているのでしょう？
}
2)1 を数字列を表わした正規表現に入れるとおかしな反応をします。
$kaigyou = "\n";
chop $kaigyou;
$length = length($suuji);
if ($suuji =~/\d{$length}/){
# false にならない。
}
3)2 の逆（数字列以外）はどうすれば良いのでしょう？
$nSuuji = "";
$length = length($nSuuji);
if ($nSuuji =~ /\D{$len}/){
# true にならない。
}
今作成している perl スクリプトで困っているのですが、どなたか助けてください。
0793名無しさん＠お腹いっぱい。
01/12/21 00:00ID:???とりあえず、もう一度見直せ。
間違いだらけ。
0794名無しさん＠お腹いっぱい。
01/12/21 00:46ID:3wtz2sHT優しく教えてplz.
0795JAPU@ハーマイオニー萌え ◆JAPUTeX.
01/12/21 00:52ID:???1) == と eq の違いを調べてください。このようなミスを防ぐには -w を付けます。
2) length($suuji) は 0 です。{n} は直前の正規表現の n 回分の繰り返しを表わします。\d{2} なら "25" とか "22" がマッチします。
3) 変数のスペルミスです。これも -w で防げます。
「プログラミングPerl 改訂版」
「Programming Perl 3rd Edition」
perldoc
を一通り読んでおくと吉。
0796デフォルトの名無しさん
01/12/21 01:06ID:???0797794
01/12/21 01:11ID:???一応書き直してみましたが、汚い似非コードは忘れてください。
知りたかったのは "\n" を chop したら何になるのか、
数字だけの文字列を正規表現で表わすのはどうやるのかというです。
~= /\d/ は数字の一つにマッチするだけですよね。
"abc000" とかでもマッチしてしまいます。
>>793さん、795さん
ご指摘どうもありがとうございます。
1)改行だけの変数を chop したらどうなるのでしょうか？
$linefeed = "\n";
chop $linefeed;
if ("" eq $linefeed){
# $linefeed の中身はどうなっているのでしょう？
}
2)1 を数字列を表わした正規表現に入れるとおかしな反応をします。
$linefeed = "\n";
chop $linefeed;
$length = length($linefeed);
if ($linefeed =~/\d{$length}/){
# false にならない。
}
3)2 の逆（数字列以外）はどうすれば良いのでしょう？
$null = "";
$length = length($null);
if ($null =~ /\D{$length}/){
# true にならない。
}
0798デフォルトの名無しさん
01/12/21 01:23ID:???http://www.kt.rim.or.jp/~kbk/regex/regex.html
>~= /\d/ は数字の一つにマッチするだけですよね。
これは =~ m/\d/ な、つまり文字列中に一つでも数字が有れば真
=~ m/^\d+$/ だろ？
>chop〜〜〜
空文字列、つまり何にもマッチしなくなる、つーかchomp使え
他にもつっこみどころは有るが、取り合えず↑のURI行ってこいって。
0799794
01/12/21 01:52ID:???イライラさせてしまって申し訳ない。
URL 見て来ました。
空文字列とは $ = ""; とするのと同じですか？
chomp してもあまり変わりがないような気がするのですが。
\d+$ というのはどういう意味なのでしょうか？
下のコードでは上手く行きませんでした（英字が入っているのにマッチしてしまう）。
$foo = abc012;
if ($foo =~m/\d+$/){
print "so bad!";
}
else {
print "oh! yeah!";
}
0800名無しさん＠お腹いっぱい。
01/12/21 02:13ID:???「改行」と明示したからだと思うよ → chomp
ちゃんと>>798を読んでから質問した方が良いと思うなあ…。
0801名無しさん＠お腹いっぱい。
01/12/21 02:14ID:???とほほの はどうだろう。
http://tohoho.wakusei.ne.jp/wwwperl.htm
あとJAPUさんも書いてるように-wをつけよう。
１行目に
#!/bin/perl -w
とか。
0802デフォルトの名無しさん
01/12/21 02:33ID:???＞空文字列とは $ = ""; とするのと同じですか？
YES、$hoge = ''; $foo = "\n"; chomp $foo;
if ($hoge eq $foo) は真
＞chomp してもあまり変わりがないような気がするのですが。
chompってのはchopのラッパーだ、改行(だけ)を削りたい時は
こっちを使う癖を付けろ
＞\d+$ というのはどういう意味なのでしょうか？
$は文字列のバッファの最後 ^ は文字列の先頭にマッチする
if ($foo =~m/^\d+$/){ に変えれ
つーか全部聞いちゃつまらんだろ -wcT
0803794
01/12/21 02:37ID:???標準入力を受け取って、それが数字のみで構成されているか判定したかったのですが、
上手く行きませんでした。
もう少し回り道をして、基本から勉強しなおした方が良さそうです。
皆さん、どうもありがとう。
0804794
01/12/21 02:52ID:???こんな夜中に付き合ってくれた皆さんありがとう！
#! /usr/bin/perl -w
$foo = <>;
chomp $foo;
if ($foo =~m/^\d+$/){
print "oh yeah!";
}
else {
print "so bad!";
}
+ と $ は別々なのね。+$ というパターンがあるのかと思ってしまいました。
一から勉強し直します。
0805名無しさん＠お腹いっぱい。
01/12/21 09:26ID:???どうしてそれでエラーが出ないのか聞きたいよ・・・。
俺もJAPUさんみたいに優しい人になりたいな。
0806JAPU@ハーマイオニー萌え ◆JAPUTeX.
01/12/21 10:20ID:???>>795 で言ってる
> {n} は直前の正規表現の n 回分の繰り返し
「正規表現」には「x」のような単なる文字も含みます。(言い換えれば、単な
る文字もそれ自体で正規表現。) たとえば、/x{3}/ は "xxx" を受理します。
0807名無しさん＠お腹いっぱい。
01/12/21 10:23ID:cRnuhycDhttp://k-server.org/idolst/
ブラクラ
0809名無しさん＠お腹いっぱい。
01/12/21 17:32ID:woby9OMk0810名無しさん＠お腹いっぱい。
01/12/21 18:31ID:f6xZfwM20811名無しさん＠お腹いっぱい。
01/12/21 19:35ID:woby9OMk8文字以外は暗号化＆復号化できないんですか？
0812名無しさん＠お腹いっぱい。
01/12/21 21:12ID:???そんなあなたにCrypt::CBC
0813名無しさん＠お腹いっぱい。
01/12/21 22:00ID:woby9OMkありがとうございます。
use Crypt::CBC;
my $cipher = new Crypt::CBC("nantara",'Blowfish');
my $ciphertext = $cipher->encrypt_hex('秘密');
print q|暗号化：|,$ciphertext ,qq|\n|;
print q|復号化：|,$cipher->decrypt_hex($ciphertext);
この使い方であっていますか？
0814名無しさん＠お腹いっぱい。
01/12/21 22:12ID:???良いんでない？
pack外すのは用途に寄りけりご自由に。
というか、2.01までVERSIONあがってたのね…
0815名無しさん＠お腹いっぱい。
01/12/21 23:21ID:woby9OMkどういう意味ですか？
0816794
01/12/22 01:31ID:???どこがまずいのでしょうか？
済みませんが教えてください。お願いします。
^ は先頭にマッチ、$ は末尾にマッチしますよね。
+ は一回以上の繰り返し。
ならば、
=~ m/^\d$/
は 0a123b0 にマッチしても良いように思っていました。
0818JAPU@日帰りで東京に出張でした ◆JAPUTeX.
01/12/22 02:30ID:???0a123b0 にマッチさせたかったら、普通は /^[ab\d]+$/ とでもしてください。
# 専用のロカールを用意すれば、\d にマッチするのかも。(?)
語頭・語尾が数字なら
/^\d(.*\d)?$/
0820794
01/12/22 03:07ID:???あ、成る程。
=~m/^\d+$/ は /^\d/ と /\d+/ と /\d$/ の組み合わせで、
最初が数字、それに続く文字列も数字、引き続いて末尾も数字ということですか。
/\d+/ は文字列の途中に一回以上数字の繰り返しがある事で、a123b もマッチする
というのが引っかかっていました。
スレ違い済みません。
0821名無しさん＠お腹いっぱい。
01/12/22 07:03ID:???コードを見ると冒頭に
load the C socket.h defines and structure manipulators
と書かれていて、Cのsocket.hをマニュピレートしているらしいのですが
コードは殆どが定数の定義で、関数定義はsockaddr_inとsockaddr_unの
２つだけなんです。
それで、sockaddr_inを追ってみるとpack_sockaddr_inと言うのを呼んでいる
のですがその実体が何処にあるのかが分かりません。
それらしきモジュールもインポートして無いしで行き詰まってしまいました。
この辺りにPERLからCのライブラリを呼んだりするコツが有ると思ってるんですが・・・
Socket.pmの謎が書かれたサイトなんかは無いでしょうか
0822_gunzip
01/12/22 09:23ID:???XSについてはperlxstut, perlxs, perlgutsなどを参照しながら慣れていってくださいな。
http://www.kt.rim.or.jp/~kbk/perl5.005/perlxstut.html
0823_gunzip
01/12/22 09:32ID:???Perl6では標準よん。
http://dev.perl.org/perl6/talks/tpc5-internals/perl%206%20internals.html
0824名無しさん＠お腹いっぱい。
01/12/22 11:54ID:???encrypt vs encrypt_hex
decrypt vs decrypt_hex
の違い、ってこってす。
0825名無しさん＠お腹いっぱい。
01/12/22 12:02ID:COKK+YU4初心者なので、パーミッションの仕方などを丁寧に教えていただきたくて・・
とっぴな事を言っているのは解っています。
どうしてもひつようなんです。
教えていただけるでしょうか？
スクリプトをはりますが・
0826８２５
01/12/22 12:05ID:COKK+YU4どうしても設置したいのです・・。
FTPを使ったIP抜きなのですが・・・。
スクリプトはあるので
詳しい設置の仕方を１から教えていただけますと幸いです・・。
恐縮な質問ではありますが、お願いします。
0827名無しさん＠お腹いっぱい。
01/12/22 12:13ID:???0%になった、こっちに行って聞け
http://mentai.2ch.net/hack/
0828８２５
01/12/22 12:17ID:COKK+YU4助けて下さい・・お願いします。
Perlの本を3冊買ったのですが
パールの使い方がよくわからなくて・・。
JPERLもインストールしました。
なんとかよろしくお願いします・・。
0829名無しさん＠お腹いっぱい。
01/12/22 12:21ID:???その場をわきまえない態度がBBSを荒らされる一因だと気付け
0830デフォルトの名無しさん
01/12/22 12:23ID:???嵐なんか放っておけば？>828
0831８２５
01/12/22 12:24ID:COKK+YU4そのとおりなのですが・・
ひどい荒らしで一年以上もあらされているのです・・。
同じ奴にです・・。
難しくてよく設置できないのです・・。
できるかぎり努力いたしますのでお力をお貸ししていただけないでしょうか・・。お願いします
0832名無しさん＠お腹いっぱい。
01/12/22 12:34ID:???＞いらっしゃーい、perlのコーディングで困ってる人のスレです。
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
設置相談はスレ違いです。
0833８２５
01/12/22 12:37ID:COKK+YU4ありがとうございます！
今自分でちょっと色々やっているので(本当に初心者なのですが・・）
もう少し経ったら整理して質問させていただきます！
どうもありがとうございます。 感謝です！
0834８２５
01/12/22 13:11ID:oibAhbUr１、自分は 一年間あらされて困っているので
FTPでIPを抜きたい。既にスクリプトは持っている・・。
２、３やってみようとしたのですが、掲示板のソースに
どうやってサブルーチンとして（？）付け足すのかなどが解らないのです・・。
従って、アップロードというかしてみても全く反映されません・・。
パーミッションを６６６にする
などの事は解るのですが、
具体的にどうやったらよいのか解らなくて・・。
一生懸命頑張りますので
どなたか少しでも教えてくださいますと幸いです・・・。
宜しくお願いします。
そう言うの慇懃無礼っつんだぞ。
それに、、
：：少なくとも1年以上PCを触っていて
：：Perlの本を3冊持っていて
：：自分でも一生懸命頑張っている
のに、設置も出来ないってのはどう言うこった(呆
本当に困ってるなら警察に相談してその旨掲示しておけよ
これは俺だけかも知れないけど、IP抜きだの生IPだのって
厨房臭くて鼻が曲がりそうになるよ。
解法を間違えてると思わないか？
0836名無しさん＠お腹いっぱい。
01/12/22 13:32ID:???と言うかこれって前にもどこかで見たんだけど、誰かばら撒いてるの?IP抜き
FTPって事はFakeのサーバみたいなのでacceptしてフレームとかで
キックさせるのかな。。 くだらないけどちょっと興味有る(笑
0837８２５
01/12/22 13:34ID:rCfJnn6Tパールの本は買ったのですが難しくて内容が・・・。
警察にはとりあってもらえませんでした。
IP抜きは、プロクシを何回も新しいのを身に付けてくるのでどうしようもないのです・・・。
宜しくお願いします・・。
＞８３６様
スクリプトを知り合いに頂きました・・。
0838８２５
01/12/22 13:41ID:OuqMrQhgでは、
既にレンタルの掲示板がある場合、
それに機能をつけたすには、
そのレンタル掲示板のソース（PERL)に、
サブルーチンとして文字を付け加えれば
そのような効果を持つようになるのでしょうか？
お答え願えますと幸いです・・よろしくおねがいします。
0839名無しさん＠お腹いっぱい。
01/12/22 13:52ID:IddObTYJ$x = 4294967296; # 0x100000000
のような値を、（ビッグエンディアンなら）
00 00 00 00 01 00 00 00
のようなバイナリファイルにしたいのですが。
pack 'Q', $x;
は "Invalid type in pack : 'Q' と言われてしまいます。。。
何かいい方法があったら教えてください。
本読んでもわからない知識ならほかの買うかあきらめて掲示板削除しろ。
どうせ1年以上荒らされているなら来ているやつもいないだろうし
それともネタ？
どれにしてもすれ違いです。
0841８２５
01/12/22 13:58ID:oibAhbUrいや、今でも一日300人ぐらい来てくださっているので・・・。
では、サブルーチンについて教えて頂け無いでしょうか・・。
掲示板のソースに ( ) で囲んでサブルーチン
（つまり導入したいCGIのソース）を押し込むだけで
機能は追加されるのでしょうか・・？
宜しくお願いします。
0843名無しさん＠お腹いっぱい。
01/12/22 14:02ID:oibAhbUr実際の意味がよく解りません・・・助けて下さい
お願いします。
0844名無しさん＠お腹いっぱい。
01/12/22 14:06ID:???Qなんて無かったよね ^―^；
今環境無いからテスト出来ないんで、ここので試してみて
http://www.rfs.co.jp/sitebuilder/perl/func/03.html#pack
確か前にdouble吐けなくて悩んだ記憶が････
0845名無しさん＠お腹いっぱい。
01/12/22 14:07ID:???貼り付けただけだと(多分)動かないよ ^―^；
0846名無しさん＠お腹いっぱい。
01/12/22 14:12ID:oibAhbUr例えば、 レンタル掲示板のソースが、
最後
exet;
で終わったします・・。そして、そのあとあるいは途中に、
( ) で囲んで、
その中に拾ったスクリプトを入れればいい・・じゃダメなのでしょうか？
よろしくおねがいします・・本当に困っているのです・・。
又、 ( ) とするべきなのか、｛ ｝とするべきなのかも解らないのですが・・うう・・・。
お願いします。
助けて下さい・・おねがいします・・・。
0847名無しさん＠お腹いっぱい。
01/12/22 14:13ID:???UG地方の特産品です。他にもNNTP、echo、telnet等など有り
これにログインマクロとか、ばればれフルコネクションの激遅スキャナとか
合わせたのが有るんだよ。 多分日本人だと思うが
0848Kusakabe Youichi
01/12/22 14:27ID:???>exet;
エラーですね。
>その中に拾ったスクリプトを入れればいい・・じゃダメなのでしょうか？
動けばそれで良いのでしょう、プログラムは書いた通りにしか動きませんよ。
>( ) とするべきなのか、｛ ｝とするべきなのかも・・
どちらでも動かないと思うので結果は同じでしょうね。
>お願いします。
多分サポート出来る限界を大きく超えているので無理ですね
0849名無しさん＠お腹いっぱい。
01/12/22 14:37ID:???>>832も書いているが、ここは８２５の一連の書き込みにあるIPの抜き方やCGI
スクリプトの動かし方を尋ねるスレじゃない。８２５は自分じゃ気付いてない
ようだが、スレの趣旨に反する君の執拗な書き込みそれ自体も、十分荒らしと
呼べる行為だよ。
掲示板の荒らしが限度を超えるなら、その旨を相手にきちんと伝えた上で、な
お止まないようなら警察に行くべき。それなりの理由で警察が動けばISPもロ
グを出すだろうし、８２５がIPを抜く必要も無い！
一方で、あれこれ訊いて仮に８２５が荒らしのIP抜けたとして、どうするわけ？
# まさかattackの方法をまた訊きに来るわけじゃないよな？（藁
８２５が不正アクセスや、迷惑メールなんかで反撃すれば法律に引っかかるだ
ろうし、IP判定で接続拒否してもIPが固定じゃなかったり、proxy使ったりで、
そういう輩なら手を変えて結局同じことを繰り返すと思うよ。そんなことして
も一向に状況は改善されないor８２５がいいように翻弄させられる（泣き寝入
りする）だけで、逆に相手に８２５の反撃を逆手にとって合法的に追求できる
可能性も与えてしまう。つまり自分の立場も悪くなるってこと。
いずれにせよこの話題を続けるのはスレ違いだとと思うので、法律板で相談す
るなり、技術的な話に絞った上で適切なスレを選ぶなりして下さい。少なくと
もこのスレの趣旨には沿わない内容です。
長文sage。
0850名無しさん＠お腹いっぱい。
01/12/22 14:44ID:???>>846
今の状態じゃ説明しきれないよ、ここに書いたとしてもそれを理解出来ないだろ?
だから今持ってる本を先に良く読んでからまたおいで。
0851名無しさん＠お腹いっぱい。
01/12/22 14:46ID:fxlPljicええと、法的にはどうにもなりません。
掲示板嵐は犯罪でもなんでもないので、（名誉毀損などなければ。）
それはムリな話です・・。
プロバイダに文句を言われればやめるので、あるいはアカ取り消しですし・・。
以後も、同様のユーザーをすぐにログを洗ってもらえるようになりますし・・。
アタックなんてできません・・。
今色々やっています・・またあとできます・・。同か宜しくお願いします皆様。
0852839
01/12/22 14:49ID:IddObTYJどうもです。いろいろ試して、
$l1 = int($x/0xffffffff);
$l2 = $x % 0xffffffff;
print pack 'LL', $l2, $l1;
これで、求めるものが出ているような気もしますが
あんまり自信もなし。。。
Q は、 perldoc -f pack すると
q A signed quad (64-bit) value.
Q An unsigned quad value.
(Quads are available only if your system supports 64-bit integer values _and_ if Perl has been compiled to support those. Causes a fatal error otherwise.)
とあって、これしかねぇ〜と喜んだのですが。。。
Win32ではサポート外だったようで。ﾊｧ
0853名無しさん＠お腹いっぱい。
01/12/22 14:50ID:???0854名無しさん＠お腹いっぱい。
01/12/22 14:57ID:oibAhbUrすみません。
今パッと取った掲示板なのですが、このサイトは
フリーで一切HTMLなどをいじっていません・・。無料BBSです。
簡単に作れてしまうサイトです。
この掲示板で、自分でCGIをつけたしたりすることは可能でしょうか？
教えて下さいお願いします。
0855名無しさん＠お腹いっぱい。
01/12/22 15:01ID:???0856Web板初心者スレ886
01/12/22 16:15ID:???Perlに関して教えて下さいと言う質問かと思ったので
こっちに回したのですが、とんでもない厨だったようですね。申し訳ない。
http://pc.2ch.net/test/read.cgi/hp/1007538322/884-
0857名無しさん＠お腹いっぱい。
01/12/22 17:17ID:???0858名無しさん＠お腹いっぱい。
01/12/22 22:57ID:???$x に 64bit int 入れてちゃんと動いてる?
実は double になってるかもよ。
0859名無しさん＠お腹いっぱい。
01/12/22 23:34ID:t/VCgPdO英語名にするとか
名前の前に_をいれるとか。どう？
ちなみに先頭に_をいれとけば予約語とかぶる事って無いですよね？
0860名無しさん＠お腹いっぱい。
01/12/23 00:58ID:MEqShOBiあるサブルーチンで出た結果を$resultに代入したとします。
これは必ず
return $result;
としなければならないのでしょうか。
returnの使い方がいまいち分かりません。
どういう時に使うもの/使わなければならないものものなのでしょうか。
perldocをみてもよく分かりませんでした・・・。
宜しくお願いします。
0861age
01/12/23 01:01ID:kSQE2xUF0862名なひ
01/12/23 02:13ID:M1oj4o+APerlのサブルーティンは戻り値返さなくてもよかったと、思う。
return();省略したら最後に評価した式が勝手に戻り血にできる、ようなきがした。
0863名無しさん＠お腹いっぱい。
01/12/23 03:01ID:???規約だけ守れば好きなようにやればいい
コーダのレベルは大体この辺で分かるけどな(笑
0864名無しさん＠お腹いっぱい。
01/12/23 03:45ID:???ローマ字にしておくほうがまだ救いがある。
0866名無しさん＠お腹いっぱい。
01/12/23 15:31ID:cDgNamdEprint $_;
}
と、
print <IN>;
ってメモリ消費量違ったりするんでしょうか？
0867分からないくせに生意気なことを言ってみる
01/12/23 15:35ID:???Perlでメモリーを気にするのはナンセンス
0868名無しさん＠お腹いっぱい。
01/12/23 15:43ID:???returnって関数なの？
0869868
01/12/23 15:45ID:???0870名無しさん＠お腹いっぱい。
01/12/23 15:46ID:???0871名無しさん＠お腹いっぱい。
01/12/23 15:47ID:???いや、関数らしいぞ。プログラミングPerl改訂版(JP)の237ページに載っている。
0872名無しさん＠お腹いっぱい。
01/12/23 15:51ID:???0873名無しさん＠お腹いっぱい。
01/12/23 15:51ID:???0874名無しさん＠お腹いっぱい。
01/12/23 15:56ID:???他の言語とは意味が違うとしか思えないよ。
0875名無しさん＠お腹いっぱい。
01/12/23 15:58ID:???ifやforも関数にすればよかったのにね。 (w
0876JAPU ◆JAPUTeX.
01/12/23 16:05ID:???過度にメモリを気にするのはナンセンスだけど、ある程度は考えようぜ。(苦笑)
(>>866 の場合は while 使うのが吉。)
0877名無しさん＠お腹いっぱい。
01/12/23 23:28ID:???突っ込み隊が一杯釣れそうだな (・∀・)
0878名無しさん＠お腹いっぱい。
01/12/24 01:49ID:???まだドキュメント読んでる最中なんで、可否が解れば幸いです ^^
0880名無しさん＠お腹いっぱい。
01/12/24 04:33ID:???0881名無しさん＠お腹いっぱい。
01/12/24 05:44ID:???有るか無いか聞いてどうすんの？
＞いらっしゃーい、perlのコーディングで困ってる人のスレです。
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
0882名無しさん＠お腹いっぱい。
01/12/24 06:24ID:uH077O8Q常套手段って有りますか
例えば上限を5とすると、5を超えるとsleep秒待ってリトライ
と言う感じで実装したいのです
0883821@v（・ ｖ ・）v
01/12/24 08:10ID:???Socket.xs、ちょっと開けて読んでみましたけど、難解ですねー
と言うかこれってスパゲッティー？
頑張りますー 、ありがとうっす。
0884名無しさん＠お腹いっぱい。
01/12/24 15:39ID:CE1hGHz4具体的な方法をご存知の方がいらっしゃいましたらご教授お願い致します。
0885名無しさん＠お腹いっぱい。
01/12/24 16:03ID:n/gVuaksJSで書き出せば可能かと。
0886名無しさん＠お腹いっぱい。
01/12/24 16:10ID:???何でSSIなん? つーかJavaスクはWEB製作だろっつの >ム板さん
Googleで「Javascript」「Set-Cookie」で検索してヒットしたものを
SSIでexeccmdすれば良いの、ソースは検索すれば１００万件位出てきます
0887田イ戈
01/12/24 17:44ID:???<meta http-equiv="Set-Cookie" content="cookiename=cookievalue">
か。Perlとは関係ないのでスレ違い。
JavScript を execcmd って何だろう？
0888名無しさん
01/12/24 17:56ID:???<meta http-equiv="Set-Cookie" content="cookiename=cookievalue">
って何だろう？
0889名無しさん＠お腹いっぱい。
01/12/24 18:01ID:???0891884
01/12/24 21:50ID:zH2D792Bexeccmdでパールで作ったＣＧＩを呼び出すのですが、
それをクッキーに食べさせる方法を聞きたかったのであります。
ＪＡＶＡスクリプト使うか
<meta http-equiv="Set-Cookie" content="cookiename=cookievalue">
を使えばいいのですね。
ＪＡＶＡスクリプトはまだやったことがないので
後者を使ってみます。
どうもみなさんありがとうございましたm(__)m
0892名無しさん＠お腹いっぱい。
01/12/25 00:55ID:SHv7CWw6てやるのと@data = <FILE>
とかに代入して処理するのだと@dataの方が
メモリ使わなかったりするのですか？
■ このスレッドは過去ログ倉庫に格納されています