07/06/04 21:33:09
バロスw
894:デフォルトの名無しさん
07/06/04 21:50:35
自演荒らしのImageMagick君ってこれと同一人物っぽいなw
URLリンク(www.gac.jp)
2chなんかに来ずにここで教えてクン続けてればよかったのに
895:デフォルトの名無しさん
07/06/04 21:59:04
さすがにそこまでストーキングっぽいことしなくてもいいのに・・・
896:デフォルトの名無しさん
07/06/04 22:45:50
>>894
どっちもImage-Magi'c'になっててワラタ
借りてる鯖はlolipopかな?
897:デフォルトの名無しさん
07/06/04 23:15:20
質問します!
open FH,"/hoge/hoge.txt" #hoge.txtを開く
while (<FH>) { #FHファイルを行単位で読み込んでいく
$Str = $_; #変数Strにデフォルトで入力やパターンマッチになる特殊変数を代入
if( $Str =~ /__\w+__/g ){ #①???
if( $Str =~ /__KEYWORD__/ ){ #②???
$Str =~ s/__KEYWORD__/KEY/; #__KEYWORD__をKEYに置換する
}
}
print $str;
}
close FH;
コメントの部分の①と②の説明がうまくできません。
①は=~の部分がわからず、②は/と/で挟まなくて__KEYWORD__だけでも
同じ結果が返ってくるのではないかと思って悩んでいます。
よろしかった教えて頂けないでしょうか?
898:デフォルトの名無しさん
07/06/04 23:24:58
%hoge;
$age = {%hoge};
というコードがあった場合、最後の代入で行われているのは
無名ハッシュコンストラクタの中でハッシュを評価することで、ハッシュのキーと値
からなるリストが生成され、それらを要素とする無名ハッシュが生成されて、そのリファレンスが
$ageに代入される。つまり%hogeのコピーのリファレンスを代入しているという考えでいいんでしょうか?
899:デフォルトの名無しさん
07/06/04 23:46:46
>>897
Perl 正規表現でググればウンザリするほど答えが見つかると思います
>>898
そうです
900:デフォルトの名無しさん
07/06/04 23:47:18
なるほど、自分で自分を許していないのですね。
ではあなたが黙れば解決です。あなたにできる最大の「低レベルな会話の排除」ですね!
あと、「本文」というのは面白い言い方だと思います。
相手に突っ込まれて、いかに馬鹿なことを言っていたかが自覚できた途端に
そこを蜥蜴の尻尾みたいに切り捨てて、「ノーダメージだよーん」ということにするのですね。
901:デフォルトの名無しさん
07/06/05 00:05:57
>>897
なんかすごい無駄だらけなソースだなあ・・・
902:デフォルトの名無しさん
07/06/05 00:31:50
ノーダメージだよーん
903:デフォルトの名無しさん
07/06/05 00:33:23
>>900
なんかすごい無駄だらけな文だなあ・・・
904:デフォルトの名無しさん
07/06/05 00:42:53
なんかすごい無駄だらけなスレだなあ・・・
905:デフォルトの名無しさん
07/06/05 00:48:01
粘着荒らし酷いな
906:デフォルトの名無しさん
07/06/05 00:52:00
粘着した方が勝ち!
907:デフォルトの名無しさん
07/06/05 01:14:38
ノーダメージだよーん
908:デフォルトの名無しさん
07/06/05 01:34:33
荒らしはやめてー><
909:デフォルトの名無しさん
07/06/05 04:03:09
変な奴が現れたら一人も漏らさず全部相手するように
それがこのスレのお約束
910:デフォルトの名無しさん
07/06/05 09:34:09
>>909
お前、もう帰っていいぞ。
911:デフォルトの名無しさん
07/06/05 10:21:08
次スレのテンプレのことについて、次の提案があるのだが、どうだろうか?
1.過去スレを入れるのはやめる。(前スレだけがあればよいと思う)
2.「エラーなどの問題への対処の相談には、問題が再現する完全かつ最短のソースを
作成して下さい。作成する過程で問題が解決する場合も多いです。」
との注意書きを >>1 に入れる。
(質問者が必要な情報を小出しにするのを防ぐため)
3.>>10をテンプレを入れる(但し、内容は、以下のように少し変更する)。
---------------------------------------------------------
# 【Perl 日本語処理の基礎の基礎】
# このレスは、Windows の ActivePerl で日本語処理を行う場合のテンプレートです。
# このレスの内容をそのまま、UTF8 形式のソースファイルに保存して下さい。
# 入出力ともシフトJIS形式のファイルまたはDOS窓を想定しています。
# まず、以下の行を先頭に入れて下さい。
use utf8;
use open IO => ":encoding(cp932)";
binmode STDIN => ":encoding(cp932)";
binmode STDOUT => ":encoding(cp932)";
binmode STDERR => ":encoding(cp932)";
# 次に、あなたが実行したい処理の内容を入れて下さい。
print "SJISには、「十表貼申予暴」のようなダメ文字がある。\n";
sleep(1);
# 以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
# おまじないです。条件が異なる場合の対処方法は、ご自分で勉強して下さい。
912:デフォルトの名無しさん
07/06/05 11:44:29
あれ?過去スレ保管所みたいなのなかったっけ?
913:デフォルトの名無しさん
07/06/06 12:20:20
URLリンク(namahage.dip.jp)