Perlについての質問箱 12箱目
■ このスレッドは過去ログ倉庫に格納されています
0848デフォルトの名無しさん
NGNG残念。>821 = >824 = >845 = >848 ≠ 他 だよ。:-)
>825 と >828 と >830 と >837 にはこれをあげよう。
print join(' ', map unpack('H2', $_), split //), "\n" while <STDIN>;
完全一致の判定は >823 が言わんとしたように eq でやるべきだけど、
>821 で eq "end\n" と書かなかった事に深い意味は無い。単に
>820 がパターンマッチで判別してたから、それに付け加えただけ。
私の思慮の浅さから荒れちゃってスレの住人諸氏にはすまなく思ってる。
ごめんなさい。
■ このスレッドは過去ログ倉庫に格納されています