くだすれPerl（超初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
471:nobodyさん 07/10/21 19:58:24 if( $ENV{'HTTP_USER_AGENT'} =~/bot|twiceler/ and $ENV{'HTTP_USER_AGENT'}!~/Googlebot|1bot|bots/){&zap;} エラー出ないよ 472:１０い 07/10/21 20:18:23 >>471さん 取り急ぎ andから書いてました perlのｱｯﾌﾟｸﾞﾚｰﾄﾞを始めてしまってなかなか終わらないので 終わったら試して確認してみます 473:１０い 07/10/21 21:22:35 >>471 上行のキーワード完全一致だけがzap4に飛びました perlのバージョンじゃなくて書き方が違っていたようです !~/hoge/ の意味を教えてください 474:nobodyさん 07/10/21 21:58:00 hogeにマッチしなければ真を返す（=~/hoge/の逆） 475:１０い 07/10/21 23:00:45 >>474ありがとうございます 476:nobodyさん 07/10/23 20:50:38 変数が配列であるかどうかを確認するには、どうすればよいのでしょうか？ 477:nobodyさん 07/10/23 21:36:17 wantarray 478:nobodyさん 07/10/23 21:54:51 >>477 すいません、 sub write { my $name = $_[0], $data = null; if ( $_[1]が配列かどうかを確認したい ) { $data = join( "\n", $_[1] ) } else { $data = $_[1] } open( OUT, ">$name" ) || return 1; print OUT $data; close( OUT ); return 0; } のようにして、ifのところで、$_[1]が配列かどうかを確認したいのですが・・・・・ wantarrayの使い方がいまいち理解できませんでした。 このような場合は、どのようにすればよいのでしょうか
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4296日前に更新/307 KB
担当:undef