Perl初心者スレ（マジレス回答）

[表示 : 全て最新50 1-99 101- 201- 301- 2chのread.cgiへ]
Update time : 06/21 06:07 / Filesize : 68 KB / Number-of Response : 301
[このスレッドの書き込みを削除する]
[＋板最近立ったスレ＆熱いスレ一覧 : ＋板最近立ったスレ／記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Perl初心者スレ（マジレス回答）

1 名前：デフォルトの名無しさん mailto:sage [2012/10/07(日) 00:48:39.00 ]: どうぞー
74 名前：デフォルトの名無しさん mailto:sage [2012/10/09(火) 17:13:03.31 ]: >>71=基地害
75 名前：Perl忍者 ◆M5ZWRnXOj6 mailto:sage [2012/10/09(火) 17:33:58.22 ]: >>71
Sjisいれろ
search.cpan.org/~ina/Char-Sjis/
76 名前：デフォルトの名無しさん mailto:sage [2012/10/09(火) 17:49:33.02 ]: >>72-74
追い出すなって。
ここは>>71みたいな社会のゴミ用隔離スレなんだからさ。
77 名前：デフォルトの名無しさん mailto:sage [2012/10/09(火) 20:44:10.43 ]: PHPのマジッククォートとSjisっておんなじものなのか？
微妙にやること違うと思うぞｗ
78 名前：デフォルトの名無しさん mailto:sage [2012/10/09(火) 22:09:35.85 ]: 初心者でUnicodeはきついかもな
ごちゃごちゃしてて何がなんだかさっぱり分かんない
初心者にはshiftjisがいい
79 名前：デフォルトの名無しさん mailto:sage [2012/10/10(水) 00:13:36.93 ]: Perlスレの頭にUnicode絡みのテンプレなかったっけ
80 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 00:36:02.70 ]: require 'jcode.pl';

だっけ？
81 名前：デフォルトの名無しさん [2012/10/12(金) 01:02:04.55 ]: >>80
確信ないなら書くなゴミ
さっさと失せろキメェんだよ
82 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 01:03:01.58 ]: >>9 「use Encode; 」
83 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 01:38:15.26 ]: それ言うなら use utf8; だろ
EncodeはUnicode以外だって扱えるんだから

でも牙が伸び過ぎると自滅してしまうこともある
ttp://blog.nakatanigo.net/archives/50474313.html
84 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 02:28:37.13 ]: >>80は頭がおかしい。
85 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 02:37:31.52 ]: >>82
ありがとうそこにあったのか
86 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 03:28:56.95 ]: >>80
もう来なくてもいいよ
87 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 12:02:40.96 ]: >>80=ゴミクズ
88 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 15:53:07.74 ]: いつもの基地外は本スレに行けよ
89 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 18:49:11.85 ]: ↑はい、いつものキチガイ入りましたー
90 名前：デフォルトの名無しさん mailto:sage [2012/10/12(金) 21:16:15.75 ]: 88はいつもただの質問者を荒し扱いしたりしてる奴だろう、放置よろ。
91 名前：デフォルトの名無しさん mailto:sage [2012/10/28(日) 18:01:11.94 ]: >>80
それです。ｻﾝｸｽﾀﾞｱｲﾅ
92 名前：デフォルトの名無しさん mailto:sage [2012/10/28(日) 20:13:19.68 ]: 初心者の彼女がjacode.pl使ってて時代の変化を感じた
93 名前：デフォルトの名無しさん mailto:sage [2012/10/31(水) 00:29:58.66 ]: いつまでもEncodeでエンコしててもしょうがないしな
94 名前：デフォルトの名無しさん mailto:sage [2012/11/06(火) 01:38:15.62 ]: ttp://kotobank.jp/word/えんこ
95 名前：デフォルトの名無しさん mailto:sage [2012/11/12(月) 19:41:16.44 ]: ActivePerl5.16.1使用中です。
---
print DAT @dat;
---
このようにして配列を書き出そうとしたのですが
なぜかテキストファイルに繁栄されません。
何か情報をご存知の方いらっしゃいませんか？
96 名前：デフォルトの名無しさん mailto:sage [2012/11/13(火) 05:02:27.13 ]: ファイルハンドルであろうDATのopen文はいかに
97 名前：デフォルトの名無しさん mailto:sage [2012/11/13(火) 22:13:06.51 ]: 以下の一行スクリプトに文字を食わせて「XX月◯◯日のお知らせ！」の次の行から「-----」の前までを取り出そうとしています。
最期のs/^　+//は各行の先頭の全角の空白を取ろうとしたのですが、これが働きません。が、抜き取り自体は成功していました。
逆に、use utf8とすると/正規表現/が全くひっかかりらず何もprintされません。

perl -e '
#use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ！/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };

s/^\s+//;
s/^　+//;
print;
}'
98 名前：デフォルトの名無しさん mailto:sage [2012/11/13(火) 22:28:35.29 ]: perl -e '
use utf8;
while (<>)
{
if (/\d+月\d+日のお知らせ！/) { last; };
#skip the line;
};
while (<>)
{
if (/-----/) { last; };

s/^\s+//;
{
no utf8;
s/^(?:　)+//;
}
print;
}'
99 名前：デフォルトの名無しさん mailto:sage [2012/11/16(金) 00:37:30.32 ]: どうもです。
状況なのですが、use utf8すると全くおかしいです。/\d+月… /のマッチが全く成功しないので、
目的通りの結果が出ません。uset utf8しないとうまく動きます。
実はMacのautomatorから呼び出されていてGet text from Webpage actionでとってきたテキストが
このperlに渡されているのですが…UTF-8の文字が来ているはずなのですが（指定のWebページのcharsetはUTF8）。

それはさておき
( ) / (?: )
の指摘ありがとうございました。上の行のs/^\s+//;と合わせて
s/^(?:\h|　|\xc2\xa0)+//;
に書き換えました。
non breakable spaceも行頭に混じっていたので、そのUTF8表現のU+c2a0も追加。
これできれいに行頭の「空白」がとれて左詰めになりました。

とりあえずuse utf8;だけ殺して一見うまく動いているのでそれで利用を開始しました。
個人の趣味の自動化目的なのでそんな感じでまずはゴーしてしまいます。
100 名前：デフォルトの名無しさん mailto:sage [2012/11/16(金) 00:44:04.42 ]: utf8プラグマは作ったひとは使うのが簡単だと考えているんだろうけど、
使うひとにとっては非常に難しい。こういった処理モデルを理解しろと
いうほうに無理がある。結論としてはutf8プラグマは使わないほうが
よい。
101 名前：デフォルトの名無しさん mailto:sage [2012/11/16(金) 14:34:35.11 ]: もう省略の美学とか無くていいから（涙）
ぜんぜん意味がわからない
たすけて
102 名前：デフォルトの名無しさん mailto:sage [2012/11/16(金) 21:20:57.16 ]: utf8にはまるのは日本固有らしい。海外では当初から見切りをつけていて
使われることはない。
103 名前：デフォルトの名無しさん mailto:sage [2012/11/17(土) 00:49:53.31 ]: この方法で重複を削除した場合
リストの順番は変更されますか。
それとも、重複が削除されるだけで、
順番はそのままですか。

my %hash = ();
foreach (@list) {
$hash{$_}++;
}
my @unique = keys %hash;
print @unique;

ご教示ください。
104 名前：デフォルトの名無しさん mailto:sage [2012/11/17(土) 01:33:36.49 ]: The keys of a hash are returned in an apparently random order.
ハッシュのキーはランダムな順番で返されます(適当訳)
perldoc.perl.org/functions/keys.html
105 名前：デフォルトの名無しさん mailto:sage [2012/11/17(土) 01:55:32.07 ]: ｹﾞｰｯ
ありがとうございました・・・
106 名前：デフォルトの名無しさん mailto:sage [2012/11/17(土) 17:04:11.19 ]: フリーソフトの利用は自己責任。
utf8作ったひとが助けてくれるわけじゃない。
自分の理解できる範囲内で使えってこった。
107 名前：デフォルトの名無しさん mailto:sage [2013/01/03(木) 08:49:11.83 ]: 文字コードとしてのUTF-8を理解してもutf8プラグマの挙動は別物
オレオレ実装むき出しの仕様で理解できず使いづらい
そこで省略の美学になる
108 名前：デフォルトの名無しさん mailto:sage [2013/01/03(木) 09:02:50.69 ]: 至らない実装は利用者が補えるが、オレオレ仕様は直せない、か
109 名前：デフォルトの名無しさん mailto:sage [2013/01/05(土) 20:10:35.16 ]: ２chのソースコード読みたい
どっかに落ちてないかな？
110 名前：デフォルトの名無しさん mailto:sage [2013/01/06(日) 06:16:44.13 ]: クレクレ厨か糞がキメェんだよ
111 名前：デフォルトの名無しさん mailto:sage [2013/01/07(月) 23:54:06.18 ]: KENT本の中に似た外見のBBSってなかったっけ？
112 名前：デフォルトの名無しさん mailto:sage [2013/01/08(火) 01:05:42.37 ]: 「？」じゃねーだろ確認して書き込めやゴミが
113 名前：デフォルトの名無しさん mailto:sage [2013/01/08(火) 01:51:30.58 ]: >>112
おまえ、うるさい！！
114 名前：デフォルトの名無しさん mailto:sage [2013/01/08(火) 05:40:51.47 ]: >>112
糞スレ乱立してた基地害が立てたスレの一つで何言ってんの？
ここは落書き帳だよ？
115 名前：デフォルトの名無しさん mailto:sage [2013/01/09(水) 00:11:00.04 ]: www.kent-web.com/bbs/
「2ch風」のマルチスレッド式掲示板です。トリップ機能、age/sage機能、
ID表示機能などが可能です。また表示部分をテンプレートファイルとし、
ユーザサイドでのレイアウト改造やデザイ改造が容易です。
116 名前：デフォルトの名無しさん [2013/01/09(水) 17:34:57.36 ]: サイトの宣伝乙
117 名前：デフォルトの名無しさん mailto:sage [2013/01/10(木) 16:07:28.37 ]: >>115
宣伝ウザい
118 名前：デフォルトの名無しさん mailto:sage [2013/01/11(金) 05:12:28.86 ]: >>115
こんなところに来てまでステマとかマジで気持ち悪いよお前
アタマおかしいんじゃねーの
119 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 01:08:29.34 ]: >>109に回答するのが初心者スレのみっちょんだから
120 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 03:52:42.37 ]: CGIの紹介はスレ違い
本当にここには基地害しか残ってないんだな
121 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 10:20:36.14 ]: >>120
残って？
スレ間違えてますよ
122 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 17:34:17.42 ]: >>120
お前、CGI知らないのか？
Common Gateway Interface（コモン・ゲートウェイ・インタフェース、
CGI）は、ウェブサーバ上でユーザプログラムを動作させるための仕組み。

件の掲示板を実現しているプログラムはPerlスクリプトだぞ？
CGIとPerlスクリプトの違いも分からないのか？
123 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 19:33:15.48 ]: >>122の言ってることは分かるがなぜここでそれを言うのか分からない。
124 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 19:43:06.23 ]: ここはゴミの隔離スレだからね
125 名前：デフォルトの名無しさん mailto:sage [2013/01/12(土) 21:38:40.14 ]: >>123
落書き帳と同じだから必ずしも会話が成立してる必要はないんだよ

発作的に書きたくなった内容を書き殴ればいい

このスレにいるのは心を病んでる奴がほとんどだからまともに相手してるとこっちまで病むぞ
126 名前：デフォルトの名無しさん mailto:sage [2013/01/13(日) 23:14:20.80 ]: >>120
ばかだな、お前以外におれがいることを忘れているぞ
127 名前：デフォルトの名無しさん mailto:sage [2013/01/19(土) 03:12:42.05 ]: アルパカ本ってどうよ？
リャマ本ほど人気ないみたいだけど
128 名前：デフォルトの名無しさん mailto:sage [2013/01/19(土) 23:32:55.48 ]: リャマ本をこなしてアルパカ本に進むわけだから当然脱落者がいるわな

リャマ本⇒らくだ本⇒アルパカ本
129 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 00:04:13.22 ]: >>128
え？
らくだ本が間に入る？
あれは上級者向きの本だお
130 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 04:06:34.04 ]: うるさいゴミ
お前が勝手に勘違いしてるだけだクズ
キメェから勘違い野郎は書き込むな
131 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 05:48:09.14 ]: はたして>>124と>>130のどちらが正しいのか
132 名前：デフォルトの名無しさん [2013/01/20(日) 08:48:48.95 ]: このスレ、気持ち悪いな
Perl使いにも、>>130みたいな気持ち悪い奴が多いから納得
133 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 09:24:26.74 ]: 荒らしが立てたスレだしな。
本スレはこっち。

Perlについての質問箱 57箱目
toro.2ch.net/test/read.cgi/tech/1353805857/
134 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 13:19:52.11 ]: そもそも今のム板にPerlスレ立てること自体荒らし行為
135 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 14:10:46.15 ]: WEBプログラミング＠2ch掲示板でも荒らされてるぞ

3 名前：nobodyさん投稿日：2013/01/19(土) 02:52:02.33 ID:???
カップ麺スレ増殖中・・・

4 名前：nobodyさん投稿日：2013/01/19(土) 03:47:52.32 ID:???
とんこつ系のインスタント麺で一番旨いのってどれだろう？
あのカップに入ってるちょっと高めのやつって実は値段ほど美味しくない

kohada.2ch.net/test/read.cgi/php/1358518487/3-4 Perlコーディング初心者質問スレ Part 67
136 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 14:12:27.88 ]: WEBプログラミング＠2ch掲示板でも荒らされてる

3 名前：nobodyさん投稿日：2013/01/17(木) 04:27:37.19 ID:???
またラーメンスレかｗ

5 名前：nobodyさん投稿日：2013/01/18(金) 23:16:14.71 ID:???
>>4
どうせ暇でしょ？
全てのスレを食べ物の話題で
埋めたらいいやん？

kohada.2ch.net/test/read.cgi/php/1358342748/3-5 Perlコーディング初心者質問スレ Part 66
137 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 14:13:55.60 ]: WEBプログラミング＠2ch掲示板でも

4 名前：nobodyさん投稿日：2013/01/16(水) 03:05:27.12 ID:???
カップ麺スレ

5 名前：nobodyさん投稿日：2013/01/16(水) 04:54:54.33 ID:???
＜前スレで出た話題＞
カップラーメン
カップ焼きそば
ユーリンチー
カレー
水分の多い食品に揚げ物を入れる件
くずもち

その他詳細などについては>>1のリンクを参照

6 名前：nobodyさん投稿日：2013/01/16(水) 20:45:34.73 ID:???
高級な料理や食品に関しての話題が出ないわけだがｗ

kohada.2ch.net/test/read.cgi/php/1358196208/4-6 Perlコーディング初心者質問スレ Part 65
138 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 14:17:41.02 ]: WEBプログラミング＠2ch掲示板で
631 名前：nobodyさん投稿日：2013/01/14(月) 19:39:50.81 ID:???
>>627
ちゃんとしたワンタンを加えるともっと旨くなるぞ

632 名前：nobodyさん投稿日：2013/01/14(月) 23:23:04.38 ID:???
餃子とかでいいんじゃね

633 名前：nobodyさん投稿日：2013/01/14(月) 23:42:44.97 ID:???
ラーメン屋のラーメンに入ってるチャーシューとスーパーで売ってるチャーシューって全然違うよな。
スーパーで買ってきたチャーシューってハムとラーメン屋のチャーシューの中間っぽい。
スーパーで普通のチャーシューも売って欲しいわ。

634 名前：nobodyさん投稿日：2013/01/15(火) 17:00:15.77 ID:+UlCw0lP
お前らってラーメン+ライスとかいける派？
俺はとんこつラーメンに限りいける

635 名前：nobodyさん投稿日：2013/01/18(金) 19:15:41.39 ID:???
お好み焼きをおかずにご飯を食べる人種もいるらしい。

kohada.2ch.net/test/read.cgi/php/1343668425/631-635 Perlコーディング初心者質問スレ Part 64
139 名前：デフォルトの名無しさん mailto:sage [2013/01/20(日) 21:56:15.25 ]: Perl自体がオワコンなのにスレを立てることが間違ってる。
特に新しくPerlを学ぼうなんて正気の沙汰じゃないんだから初心者スレは不要。
せいぜい昔のPerlで作られたシステムの保守をやらされてるSE土方が情報交換するくらいだろ。
140 名前：デフォルトの名無しさん mailto:sage [2013/01/21(月) 00:12:29.99 ]: 昔のPerlも覚えられず、かといって新しいPerlも覚えられない。
悔しいんですね？分かります。
141 名前：デフォルトの名無しさん mailto:sage [2013/01/22(火) 06:03:34.12 ]: あのぷっくりサスペンダーのおじさんもオワコンなの？最近見ないけど
142 名前：デフォルトの名無しさん mailto:sage [2013/01/22(火) 07:05:37.78 ]: Perl最強
143 名前：デフォルトの名無しさん mailto:sage [2013/01/22(火) 21:07:00.40 ]: 荒らしが立てたスレ
144 名前：デフォルトの名無しさん mailto:sage [2013/01/22(火) 23:00:03.67 ]: 古いPerlだと新しいソフトが書けないと考えるひとがいるようですね。
たいした仕事できなさそう。
145 名前：デフォルトの名無しさん mailto:sage [2013/01/23(水) 01:43:22.70 ]: どっちにしてもPerlはオワコン
PHPがここまで進化しちゃうとPerlの存在価値はどこにあるんでちゅかねーｗ
146 名前：デフォルトの名無しさん mailto:sage [2013/01/23(水) 01:52:30.08 ]: >>145
ワンライナー
147 名前：デフォルトの名無しさん mailto:sage [2013/01/23(水) 04:53:44.35 ]: ごった煮の点で、PHPもPerlににている　→　Perlとおなじような運命だろう
148 名前：デフォルトの名無しさん mailto:sage [2013/01/23(水) 05:58:31.38 ]: PHPっていうとWebアプリしか書けないイメージがある
PerlはC言語/シェルスクリプトが担っていた分野をカバーしているので
今後も使われていくだろう
Perlがオワコン説は単に初心者プログラマの脱落を意味しているだけで
もともと使っていたシステム管理者らが使うのをやめることはない
149 名前：デフォルトの名無しさん mailto:sage [2013/01/24(木) 17:21:48.69 ]: PerlっていうとWebアプリしか書けないイメージがある
PHPは当初よりかなり進化しているので
今後も使われていくだろう
Perlがオワコン説は初心者プログラマがPerlを選らばないとう現実を意味しているから
もともと使っていた老害が使い続けるだけという結末になる
150 名前：デフォルトの名無しさん mailto:sage [2013/01/24(木) 21:48:04.27 ]: PerlもPHPもどちらも書いてると、PHPの方がクソだと思えてくる。
151 名前：デフォルトの名無しさん mailto:sage [2013/01/25(金) 00:32:34.81 ]: Perlっていうとぷっくりサスペンダーのおじさんのイメージがある
ときどきアニメを例えに使うあのなぞなぞ好きなおじさんだ
甲高い声が人気なので今後も使われていくだろう
Perlがオワコン説はWindowsユーザがPerlを選ばなくなったとう現実を意味しているから
もともと使っていたJperlを使い続けるしかないということになる
152 名前：デフォルトの名無しさん mailto:sage [2013/01/27(日) 11:34:47.69 ]: perlからC言語で作った実行ファイルを実行するときC言語のソースが

printf("A");
scanf(); ---Bを入力
printf("C");

のときにこの実行ファイル実行結果ををperlで受け取るときperl側で
ACとなってしまいます。
これを
AB
C
として受け取りたいのですがどうすればいいでしょうか？
153 名前：デフォルトの名無しさん mailto:sage [2013/01/27(日) 13:15:02.04 ]: >>152
scanf()で受け取った文字列をprintf()してはダメなの？
154 名前：デフォルトの名無しさん mailto:sage [2013/01/27(日) 13:42:25.19 ]: >>152
自分で調べろよゴミが
そもそもここはスレ立て荒らしが立てたスレだ
155 名前：デフォルトの名無しさん mailto:sage [2013/01/27(日) 14:22:43.67 ]: >>152
お前みたいな馬鹿にプログラム組んでもらわなくても誰も困らないからさっさと回線切れ。
156 名前：デフォルトの名無しさん mailto:sage [2013/01/27(日) 23:46:32.04 ]: なんで自分で調べられないん？
157 名前：デフォルトの名無しさん mailto:sage [2013/01/28(月) 11:00:02.92 ]: >>152
基礎もできてないゴミの癖にうざい
158 名前：デフォルトの名無しさん [2013/01/29(火) 21:18:44.13 ]: futomi's CGI Cafeの「清き一票!（投票CGI）」というフリーのCGIを元に投票項目を増やしたいのですが、HTMLの方で増やしたname属性をCGIの方に反映させる方法がわかりません。

もう2週間ほどPerlについて書いてあるページを調べ回りながら試行錯誤を繰り返しているのですが、どこをどういじればいいのかよくわかりません...

ヒントだけでもいいので教えてください。お願いします。
159 名前：デフォルトの名無しさん mailto:sage [2013/01/29(火) 21:29:31.69 ]: 何で作った奴にきかずに赤の他人にきいてんだ？
しかもタダで教えろとか本当にゴミだなお前。

回線切れ乞食。
160 名前：デフォルトの名無しさん [2013/01/29(火) 21:37:22.44 ]: >>159
すみません。
2004年に配布されたもので結構昔のものなので製作者様の方に教えてもらうことができなくて、ここなら何かヒントになることだけでも教えていただけると思ったので...
161 名前：デフォルトの名無しさん mailto:sage [2013/01/29(火) 22:19:55.44 ]: >>160
Perlを最初から勉強すればすむ話だろゴミ
それにそれが情報乞食をする理由になるの？
本当に乞食じゃねぇのこいつ
162 名前：デフォルトの名無しさん mailto:sage [2013/01/29(火) 22:30:06.20 ]: >>160
Perlを使いこなすために書籍に何万と投資をし、書籍を読んだりコードを書いたりするのに何年と時間を投資し、
そうやって身に付けたものをお前みたいなクズにタダで使う理由は？
163 名前：デフォルトの名無しさん mailto:sage [2013/01/30(水) 01:17:52.20 ]: 投票項目の多いCGIプログラムを入手するのが目的なのか、Perlのスキルを
高めたいのかどっちなんだ？
164 名前：デフォルトの名無しさん mailto:sage [2013/01/30(水) 01:24:07.81 ]: READMEに全部書いてあったわ、ネタか
165 名前：158 mailto:sage [2013/01/30(水) 02:59:15.11 ]: 思ったほど釣れなかった
166 名前：デフォルトの名無しさん mailto:sage [2013/01/31(木) 19:36:40.96 ]: いつものキチガイしかいないしな
167 名前：デフォルトの名無しさん mailto:sage [2013/01/31(木) 23:38:52.70 ]: Perlの本質
168 名前：デフォルトの名無しさん mailto:sage [2013/02/03(日) 23:45:45.37 ]: モダンPerlの本質、な。そこ混同しないように。
169 名前：デフォルトの名無しさん mailto:sage [2013/03/01(金) 00:35:14.22 ]: モダンPerlを勧めるひとは熱心なあまりキチガイみたいに見えてしまうってこと？
でも本来のキチガイとは違って、モダンPerlやめれば症状が改善されるんだよね？
170 名前：デフォルトの名無しさん mailto:sage [2013/03/01(金) 04:28:53.25 ]: >>169
ゴミは黙ってろ
171 名前：デフォルトの名無しさん mailto:sage [2013/03/02(土) 01:42:04.04 ]: 改善された例を見たことがない。キチガイは自滅してオワコンだ。
172 名前：デフォルトの名無しさん mailto:sage [2013/03/06(水) 14:29:08.45 ]: 俺は間違っちゃいない！世界が間違ってるんだ！
永遠に叫び続ければいいよ。
173 名前：デフォルトの名無しさん mailto:sage [2013/12/27(金) 05:55:34.37 ]: perl覚えたけど使い道が無い
174 名前：デフォルトの名無しさん mailto:sage [2013/12/30(月) 19:13:23.07 ]: Sublime2 TextからPerl実行出来るようにしてるが頗る便利
テキストの処理がいつでも出来る
それとフォルダ毎にzip圧縮するときなんかに使ってるわ
D&Dするようなアプリだとフォルダまとめて圧縮しちまうからな
175 名前：デフォルトの名無しさん [2014/01/18(土) 19:07:08.88 ]: print は引数を省略できるけど、
join は引数を省略できない

どの関数はどの引数を省略できるのか
省略した時はなにがあてはまるのか

の標準関数の分の一覧ってある？
176 名前：デフォルトの名無しさん mailto:sage [2014/01/25(土) 08:40:46.49 ]: ぬおおperldoc.jpさんありがとおおお！！
177 名前：デフォルトの名無しさん mailto:sage [2014/01/25(土) 14:34:38.45 ]: プログラミングPerl 改訂版　ママゾンだと1円です
178 名前：デフォルトの名無しさん mailto:sage [2014/01/25(土) 20:50:09.90 ]: >>176
Twitterでやれ低知能
179 名前：デフォルトの名無しさん [2014/02/02(日) 03:06:31.84 ]: 標準出力を乗っ取る機能ある？
普通にprintしてもフィアルに書き出すみたいなやつ
180 名前：デフォルトの名無しさん mailto:sage [2014/02/02(日) 03:11:10.25 ]: >>179
それって普通リダイレクトでやるもんじゃないの？

そもそも標準出力＝「画面とは限らない」ものなんだから
181 名前：デフォルトの名無しさん mailto:sage [2014/02/02(日) 03:20:11.89 ]: そもそもフィアルってなんだ？
異次元デバイス？
182 名前：デフォルトの名無しさん mailto:sage [2014/02/02(日) 07:25:47.08 ]: >>179
あるよ
183 名前：デフォルトの名無しさん mailto:sage [2014/02/02(日) 14:32:34.15 ]: 質問かと思ったらただの精神異常だった件。
184 名前：デフォルトの名無しさん mailto:sage [2014/02/02(日) 19:33:16.71 ]: >>179
ttp://perldoc.jp/func/select
185 名前：179 mailto:sage [2014/02/02(日) 20:46:01.69 ]: >>182
ありがとう
STDOUTだったわ
186 名前：デフォルトの名無しさん mailto:sage [2014/02/03(月) 00:53:32.45 ]: >>185
二度と来るな
187 名前：デフォルトの名無しさん [2014/02/13(木) 00:44:22.79 ]: ただの不備を精神異常とか二度と来るなとか罵るのもどうなのよ
だから過疎ってんだよ
188 名前：デフォルトの名無しさん mailto:sage [2014/02/13(木) 01:00:25.87 ]: という精神異常者の意見。
189 名前：デフォルトの名無しさん mailto:sage [2014/02/13(木) 06:54:32.76 ]: >>187
Perl関連スレ、何故か荒らしが住み着いてるからなあ
190 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 03:29:16.57 ]: 自分が昔書いたプログラムの
a{\%$b}=c
の意味がわかりません
191 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 03:31:13.19 ]: 失礼しました正確には
$self->{a}{\%$b}=$c
でした。助けてください。
192 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 04:51:13.29 ]: >>190-191
マジレススレだからマジレスすると、書き込み前の確認すらできないほど頭の悪い奴にプログラミングは向いてない。
早く回線切れ。
193 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 06:01:06.70 ]: ごみがまたパールの保守性の低さを証明してくれましたｗ

PHPだとこういった事態の発生する可能性がパールより低い

保守性を考えるならPHP
194 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 11:17:17.47 ]: >>190
ウザい
195 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 13:45:31.98 ]: Perlの場合は、保守性を考えると非・オブジェクト指向のほうがいいよ
　$self->{a}{\%$b}=$c
は分かりやすくすると
　$self->{'a'}->{$b} = $c
になる
ただ $b は本当にハッシュのリファレンスなの？
196 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 13:54:50.01 ]: 質問に質問で返す愚図
197 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 14:05:22.33 ]: >>195はコードも読めないのに住み着いてるのか・・・
198 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 14:22:08.60 ]: あ、>>195であってたｗ、俺が読めてなかった、ごめんｗ
199 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 14:42:56.54 ]: 最近はこういう有象無象しかいないの？
200 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 14:53:47.23 ]: >>195を貶めてる奴らも
回答できてない時点で同レベル
201 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 14:56:05.17 ]: Perlなんか使ってる時点でｗ

☆統計開始以降利用人口史上最低記録絶賛更新中☆
ttp://www.tiobe.com/index.php/content/paperinfo/tpci/Perl.html
202 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 17:11:49.28 ]: ちろべとかどうせ海外の話でしょ、ひまわりが載ってないしｗ
203 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 17:18:51.05 ]: 韓国も入ってないだろうな。
韓国ではRubyよりPerlのほうが圧倒的に人気だから
そんなIT人口の多いIT先進国のデータが入ってたら絶対Perlのほうが上位に来るよ。
204 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 20:49:43.46 ]: 韓国では何をきっかけにPerl人口が増えたの？例えばO'Reillyとかは韓国語版を
出していないよね？韓国のひとは何を使って勉強したの？教えてえろいひと
205 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 21:42:43.14 ]: >>195
ありがとうございます。それをヒントに少し思い出してきたかも。
206 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 22:15:24.73 ]: こういうクズがコミュニティの足引っ張ってんだよな
207 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 22:32:20.62 ]: >>205
迷惑がられてる自覚はないわけね。
208 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 22:34:34.38 ]: そう言ってるだけのお前も迷惑がられてる自覚はないわけね
209 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 23:02:19.74 ]: 荒らせればオウム返しでも何でもいいんだな
210 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 23:18:36.63 ]: 俺も荒らし…まあそうだろうなあ、自覚は無いようだけどお前も荒らしだよ？
211 名前：デフォルトの名無しさん mailto:sage [2014/02/15(土) 23:27:26.42 ]: ここは常に罵りあってる気持ちのよいスレッドですね
初心者も質問しやすくて大変良い雰囲気だと思います
212 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 00:15:49.07 ]: >>190みたいな奴がそうなるように
仕向けてるんだよ。
213 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 00:43:26.71 ]: リファレンスをハッシュのキーに使ってもいいの？何か間違えてない？
214 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 00:51:25.65 ]: >>213
ドキュメントも読めないのかゴミ
215 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 00:58:35.57 ]: そもそもPerlを選択する時点でかなり間違えちゃってるから別にいいんじゃね？ｗ
大元で間違ってるのに枝葉の間違いばかり気にする馬鹿ってたまにいるよな。

中国産の野菜は農薬が酷いが、中国産のキャベツと中国産の白菜のどっちが安全か考える馬鹿。
そもそも中国産の野菜を選ぶ時点で間違ってると気付かない馬鹿。

低所得で納税額の少ない社会のお荷物に多い傾向。
216 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 01:09:56.43 ]: >>215
馬鹿というより向上心がないんでしょ
一つ言語を覚えたらそこに落ち着いてしまうタイプだと思われ
217 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 01:49:27.33 ]: 向上心のない奴は何やっても駄目、他人に懇切丁寧に教えてもらって半人前とかね
居残りさせられて先生がつきっきりで人一倍教えてるのに50点しか取れない奴いただろ
218 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 09:18:13.70 ]: 新たにPerl覚える人間が居ないとでも？
良く出来たツールだと思うよ、ホント
219 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 13:55:54.78 ]: Perlを覚えられないひとのためにできたのがPHP。PHPはPerlの機能限定版。
だからCGIにしか使えない。
220 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 13:59:57.82 ]: 流石に、PHPをCGIで使う例は稀かと
221 名前：デフォルトの名無しさん mailto:sage [2014/02/16(日) 23:07:15.10 ]: >>220
>>221みたいな認識でPHPを否定してPerlを使い続けてるのがPerl厨なんだよ
222 名前：デフォルトの名無しさん mailto:sage [2014/02/17(月) 01:44:26.48 ]: PHP使うくらいならPerl4を使うけどな、このスレ的にも
223 名前：デフォルトの名無しさん mailto:sage [2014/02/17(月) 08:01:50.33 ]: そもそも用途が全然違うものを比べる意味が解らないな
224 名前：デフォルトの名無しさん [2014/02/17(月) 11:11:07.50 ]: Perl使える奴がわざわざぺちぴー入れてまで使う理由がない
225 名前：デフォルトの名無しさん mailto:sage [2014/02/17(月) 21:20:39.98 ]: >>222
PHPのクラスやトレイトを
Perl4でどうやって実装するの？
226 名前：デフォルトの名無しさん [2014/02/17(月) 23:26:58.49 ]: 必要のないものをどうして実装する必要があるのだ
227 名前：デフォルトの名無しさん mailto:sage [2014/02/18(火) 01:23:53.24 ]: 2つも3つも糞スレ建ててんじゃねーよゴミPerler
228 名前：デフォルトの名無しさん [2014/02/18(火) 02:13:13.87 ]: それぺちぱーだろ
229 名前：デフォルトの名無しさん mailto:sage [2014/02/18(火) 22:40:42.68 ]: >>226
まず必要あるかないかは、必要あるという前提にしましょう。
別にPHP専用用語ではないのだから、世界的には必要あるという流れです。

その前提で、どうやって実装するのか答えてください。
230 名前：デフォルトの名無しさん [2014/02/19(水) 01:19:55.57 ]: 必要あるやつが実装すればいいだけのことだな
231 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 15:50:16.30 ]: これからは質問者が来ても全部>>230のレスしか返りません。
232 名前：デフォルトの名無しさん [2014/02/19(水) 20:01:53.86 ]: #!/usr/bin/perl
$buffer = $ENV{QUERY_STRING};
@pairs = split( /&/, $buffer );
foreach $pair ( @pairs ){
( $name, $value ) = split( /=/, $pair );
$FORM{$name} = $value;
}
$A = $FORM{name1};
$B = $FORM{name2};
print "Content-type: text/html\n\n";
print << "_EOM_";
<html>
<body>
A*B　=　$A * $B
</body>
</html>
_EOM_
233 名前：デフォルトの名無しさん [2014/02/19(水) 20:04:58.23 ]: 上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、
いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、
どうしたらよいでしょうか。
234 名前：デフォルトの名無しさん [2014/02/19(水) 20:09:03.95 ]: というか、どこかおかしいところがあるでしょうか？
235 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:33:02.58 ]: >>232-234
おかしいのはお前の頭だ
基本的なこともできてないくせに他人に質問とか頭腐ってんじゃねーの
236 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:36:13.45 ]: >>234
>>232,>>233が板違いだということに気付かないのがおかしい。

平気で板違いの書き込みをするキチガイは迷惑。

お前みたいなクズはリアルでも迷惑がられてるんだから自覚しろ。
237 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:41:12.79 ]: >>232=基礎をやらずにいきなりプログラミングから入る典型的なゴミ
目的達成までの手順すら把握できてないからプログラミング以前の問題
何やっても駄目な奴のパターン
人生乙
238 名前：デフォルトの名無しさん [2014/02/19(水) 20:41:52.31 ]: しね
239 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:47:40.29 ]: >>237
人生乙は言い過ぎ。

高卒以上なら人生乙だけど、
>>232-234みたいな小学生は
中高で挽回できる可能性がある。
240 名前：デフォルトの名無しさん [2014/02/19(水) 20:49:37.80 ]: 一人芝居乙ですｗｗｗｗ
241 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:50:45.28 ]: ＞上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、
＞いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、
日記はブログに書け

＞どうしたらよいでしょうか。
今すぐプログラミングやめろ
そして二度とくるな
242 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:53:44.83 ]: Perl系スレは質問者が叩かれると張り切って答える奴がいるから　質問したら自演で自分を叩くのが常套手段
243 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:56:43.89 ]: >>234
スレ違いのネタで荒らす以外やることないわけ？
244 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 20:59:52.26 ]: スレ違いどころか板違い
頭が悪いにも程がある
発達障害かもな
245 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 21:03:24.03 ]: >>232
馬鹿はPerlコミュニティの質を下げるだけだからこっちに行ってくれ。
kohada.2ch.net/test/read.cgi/php/1390166591/
246 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 21:11:38.56 ]: >>232
PHPなら一瞬で片付く案件
<?php
$x = $_GET['name1'] * $_GET['name2'];
echo( $_GET['name1'] . " * " . $_GET['name2'] . " = " . $x );
?>
247 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 21:16:25.09 ]: >>234
入門書1冊読めば大抵書いてあるはずだが・・・
本1冊買えない乞食か？
そんなに金がないならプログラムなんかやめてバイトでもしたほうがいい
日雇いでも書籍1～3冊買える金もらえるぞ
248 名前：デフォルトの名無しさん [2014/02/19(水) 21:27:19.38 ]: 初心者スレってかいてあるだろーが字よめねぇのかよカス
249 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 21:34:53.78 ]: 書籍すら読めないのは初心者以前に脳に異常がある
250 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 21:42:16.32 ]: >>248
だよね。
初心者だったらスレ違いだろうが板違いだろうが
気違いだろうが許されるよね。
251 名前：デフォルトの名無しさん mailto:sage [2014/02/19(水) 22:23:35.20 ]: >>250
板違いは許されんよ。
基地外はスルーだよ。
頭悪いのはテキトーに対応するべきだよ。
252 名前：デフォルトの名無しさん [2014/02/20(木) 01:17:13.12 ]: 初心者は自力で解決しようとしない奴のことではないぞ
253 名前：デフォルトの名無しさん mailto:sage [2014/02/20(木) 19:53:03.78 ]: >>232
A*B　=　$A * $B

の部分を

A*B　=　@{[ $A * $B ]}
254 名前：デフォルトの名無しさん mailto:sage [2014/02/20(木) 20:41:02.18 ]: >>253
板違いのゴミ(>>253)にエサを与えないでください。
エサを与えるとゴミ知能の>>253が味をしめて今後も荒らしに来るようになります。
255 名前：デフォルトの名無しさん mailto:sage [2014/02/21(金) 00:11:06.41 ]: と荒らしが申しております
256 名前：デフォルトの名無しさん mailto:sage [2014/02/21(金) 01:00:44.16 ]: >>255を見れば分かるが

「板違いは荒らし」という人間＝荒らし

この思考回路がPerl厨
257 名前：デフォルトの名無しさん mailto:sage [2014/02/21(金) 02:50:14.54 ]: >>256
残念ながら、思考回路も間違ってるしPerl厨でもないなあ
板違いの指摘そのものは問題ではないよ、実際のところ >>232 は板違いだしな

ただ板違いへの対応ってのは
・板違いと指摘する
・徹底してスルーする
であるし
>>254 が板違いのゴミと呼ぶ >>253 は
「板違い」ではなく「板違いに誤った対応をした人物」でしかない。

しかも内容は相手を煽るような罵倒語ばかり。
誤った煽りは、結果的にはその人物の発言を増やすことになる。
だから >>254 も荒らしってことなんだよ。

ああ、荒らしにレスするのも荒らしだからな
俺が荒らしと言われても、勿論構わないよ？
荒らしにレスしたことには間違いないしな。
258 名前：デフォルトの名無しさん mailto:sage [2014/02/21(金) 02:51:46.89 ]: ＞「板違いは荒らし」という人間＝荒らし
Perl厨はいちいちこんなこと考えてないと思うぞ。
単に気に入らない奴=荒らしってことだと思われる。
259 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 22:30:28.45 ]: 質問させてください。
現在、NEなのですが、社内SEを目指しています。
その時に、サーバ作業を簡単に処理させる言語が必要にりそうなのですが、
Perlは向いていますでしょうか？
掲示板とかを作るつもりはありません。作業の効率化が目的です。
隣の席のプログラマさんに聞くと、
Perlは古くてCGIにはもう未来がないよー、ってお勧めされないのですが…
260 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 23:19:05.46 ]: >>259
IT系で上を目指そうって人間に何でPerlなんて選択肢があるわけ？
そこらへん考えたほうがいいよ。

SEならITに関しては常に最新の動向を知るためにアンテナ張ってなきゃならないし、
アンテナ張ってればPerlがいかに駄目かというこてが分かる。
SE目指すならその辺りを自分で調べられるようになってたほうがいい。
261 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 23:25:59.25 ]: >>259
PHPのほうがいい
作業を簡単に処理させるスクリプトとかって最初はそのつもりがなくても便利ならそのまま他のものを作るときに組み込んだりする
エンジニア以外でも有用な場合はWebインターフェースにして提供することなるけどその場合にPHPで書いてあるとインターフェース作るだけですぐに提供できる
262 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 23:28:04.79 ]: >>259
マジレスすると今現在はRuby
但し3ヵ月後、半年後は分からん
自分でその情報を追えないならSEはやめとけ
今現在既に追えてないみたいだけど
263 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 23:50:35.64 ]: >>259
そもそもその文脈でCGIは全く関係ないよ。そこに気付けないなんて釣りだろ？
264 名前：デフォルトの名無しさん mailto:sage [2014/02/22(土) 23:56:23.80 ]: >>260-263
ありがとうございます！
javaか、PHPか、perlで悩んでました。
色々調べると、PHPが入り易そうなので、、
明日、本屋に行って、決めます。

※CGIは、掲示板とか作るのであって、検索とかするのとは違うなあ、
と思いながら、プログラマさんの意見を聞いていました。
265 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:03:57.16 ]: >>264
やっぱ釣りだったか
266 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:08:16.47 ]: PHPが第一候補だったのですが、某サイトで、

PHPは、WEB系以外には、まったく意味がない、との様なコメントがあり、困りました。
javaは、いきなり入るには、まだ敷居が高いかなと悩みました。
perlは、単に簡単な、検索や置換には適しているようなコメントで一気に候補に挙がりました。

これらから悩んでいたんです。コメントありがとうございます。
267 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:20:28.63 ]: >>266
そのコメントとやらの投稿日時と信憑性も確認しろよ
まさか去年の夏以前の投稿で、しかも第一線で活躍してい"た"奴の投稿じゃないだろうな

3ヵ月以内の投稿で、しかも第一線で活躍してい"る"人の投稿なら信用しろ
そしてそういう人ならまずPerlを候補に挙げることはない

まぁ第一線で活躍してるわけでもない俺のこんな匿名の投稿も信憑性がないだろうから
第一線で活躍してる人がPerlなんか使わないということは自分の目で確認してくれ
268 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:24:33.24 ]: >>267
投稿日時、第一線は確認していませんでした。
すみません、助言、ありがとうございます。
269 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:27:42.14 ]: >>266
PHPがWeb系以外に使えんのは本当
Perlでも良いけど、RubyやPythonも有効だよ
まあ、まずは最初にシェルスクリプトだけどね
270 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:38:05.80 ]: と言うか、PerlスレにPHPのこと聞く時点で釣り
271 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:39:36.75 ]: >>269
＞PerlとLispが結婚して隔世遺伝が黒魔術で生まれた言語。
＞Javaは硬度8くらい、Pythonは6くらいになるのに対して、Rubyは3くらいになる。

との記事を見つけました。いつの記述かわからないのですが（汗）
Rubyも明日、本屋で漁ってみます。ありがとうございます。
272 名前：デフォルトの名無しさん mailto:sage [2014/02/23(日) 00:40:48.81 ]: >>270
すみません。退散します。
みなさん、マジレス、ありがとうございます。
273 名前：デフォルトの名無しさん mailto:sage [2014/03/05(水) 06:22:38.93 ]: >>232-234
_EOM_なんて使っちゃだめだよ。見づらい。

print "Content-type: text/html\n\n";
print "<html>";
print "<body>";
print "A*B　=　$A * $B";
print "</body>";
print "</html>";
274 名前：デフォルトの名無しさん mailto:sage [2014/03/25(火) 21:15:29.29 ID:dz69sIJc]: print "あいうえお";

↑これを文字コードをeuc-jpで保存してコマンドプロントからこのファイルを実行して
コマンドプロンプト上に文字化けなく　あいうえお　と出力させるにはどういうコードを追加すればいいの？
275 名前：デフォルトの名無しさん mailto:sage [2014/03/25(火) 21:25:34.52 ID:dz69sIJc]: >>274はちょっと疑問に思っただけで何かするのに必要なワケじゃないので無理して
答えようとしないで下さい。たぶんちょっとググった程度で分かるようなことではないです。
276 名前：デフォルトの名無しさん mailto:sage [2014/03/25(火) 21:54:24.41 ID:En8OrmpQ]: >>274-275
perldoc.jp/docs/modules/encoding/encoding.pod

use encoding 'euc-jp', STDOUT => 'cp932';

但し Perl 5.18.0 以降、encoding プラグマは非推奨で将来的に削除される予定。
perldoc.perl.org/encoding.html#WARNING
277 名前：274 mailto:sage [2014/03/25(火) 22:08:05.94 ID:dz69sIJc]: >>276
うおお、すごい、あっさり出来てしまった・・。
今日一日↓こんなのでやろうとして泥沼にハマってました。

use encoding "euc-jp";
binmode STDOUT, ':encoding(cp932)';

スーパーハカーさんどうもありがとう～
278 名前：デフォルトの名無しさん mailto:sage [2014/05/07(水) 01:39:02.09 ID:NfbdqxRr]: print +(3,2,1,),"\n";

↑これ、+記号を消すと改行が反映されなくなるんですが、この+記号って
どういう意味ですか？ググるためのキーワードだけでもおねがいします。
ググると +{ } は出てきたんですが +( ) はなぜか見つかりませんでした。
279 名前：デフォルトの名無しさん mailto:sage [2014/05/07(水) 04:47:36.14 ID:nyTYPDB6]: >>278
(print(3,2,1)), "\n";
280 名前：デフォルトの名無しさん mailto:sage [2014/05/07(水) 06:28:00.20 ID:WoJ0c0N0]: +() は scalar () とほぼ同等。
+{}は、ブロック中の戻り値（？）をスカラーとして評価しますって意味。
+()は、リストとして評価しませんよーって意味。

perldocのperlopの
Terms and List Operators (Leftward)
と
Unary "+"
を参照してください。
281 名前：278 mailto:sage [2014/05/07(水) 09:44:31.49 ID:NfbdqxRr]: >>279-280
なるほど、+{ } と同じような使い方だったんですね、ありがとうございました。
perldocもこれから読んでみます、多謝。
282 名前：デフォルトの名無しさん mailto:sage [2014/05/17(土) 17:23:28.43 ID:syasv/b2]: windowsの隠しファイルを判別する方法を教えてください
283 名前：デフォルトの名無しさん mailto:sage [2014/05/17(土) 18:53:12.61 ID:9KhUrEje]: >>282
search.cpan.org/dist/Win32-File/File.pm

use Win32::File qw(GetAttributes HIDDEN);
GetAttributes($ARGV[0], my $attr) or die $!;
print +($attr & HIDDEN) ? 1 : 0;
284 名前：デフォルトの名無しさん mailto:sage [2014/05/17(土) 18:54:17.69 ID:syasv/b2]: >>283
ありがとうございます
285 名前：デフォルトの名無しさん mailto:sage [2014/05/24(土) 13:13:06.88 ID:JzdRsmzF]: 掲示板のCGIを設置したんだけど、<a href="./bbs/mtbbs.cgi?">って感じにリンクするようにして、172では、ちゃんと作動したんだけど、
実際にFTPに転送すると、作動しないどころか画面が写らない
500エラーが出てくる

原因に関してはまだわかんなくて、調べてるんだけど、そもそも思ったのが<a href="./bbs/mtbbs.html">ならまだしも<a href="./bbs/mtbbs.cgi?">なんて、直にリンクすることなんてできるの？
286 名前：デフォルトの名無しさん mailto:sage [2014/05/24(土) 17:20:37.74 ID:Cq+cm/k7]: >>285
WebProg板へドゾー
287 名前：デフォルトの名無しさん mailto:sage [2014/05/25(日) 10:23:53.30 ID:iOXakntE]: >>285
リンクはできる
動かない原因は別にある
288 名前：デフォルトの名無しさん [2014/06/04(水) 10:34:27.77 ID:8N6swAY/]: 知恵袋で質問したら回答どころか閲覧すらなさすぎワロタ・・・
289 名前：デフォルトの名無しさん [2014/06/04(水) 15:39:06.30 ID:ZiHf6GEW]: 早くマジレスしろ屑やろう
290 名前：デフォルトの名無しさん [2014/06/05(木) 04:14:43.22 ID:tjfA5i3O]: 質問してもどうせまともに答えてくれないんだろうな
どこ行っても解決しないわ
291 名前：デフォルトの名無しさん mailto:sage [2014/06/05(木) 06:34:54.17 ID:Mvr5+GEe]: Web以外で最近なんか未解決質問あったっけここ
292 名前：デフォルトの名無しさん mailto:sage [2014/06/05(木) 19:01:58.49 ID:aZWI6Ot4]: >>291
今日も元気に残件なす！
293 名前：デフォルトの名無しさん mailto:sage [2014/06/08(日) 05:04:05.20 ID:LT2twBt5]: 複数のRSSフィードを結合して一つのRSSを生成したい。
その際、「生成されたフィード記事のリンクURLすべてを任意のリンク先に指定する。」
このやり方を教えてください。

XML::FeedPP、XML::TreePPというモジュールを用い、下記のCGIプログラムを使用して自動更新する１つのフィードを生成するところまでは出来ました。
しかし、他の部分はチョロチョロと変えることができるのですが、記事リンクだけはどうしても変えることができません。全部の記事リンクを、ある１つのリンクに変換したいだけです。

#!/usr/bin/perl

use XML::TreePP;
use XML::FeedPP;

my $feed = XML::FeedPP::RDF->new();
$feed->merge( "結合したいrssフィード1" );
$feed->merge( "結合したいrssフィード2" );
my $now = time();
$feed->sort_item();
$feed->pubDate( $now );
my $atom = $feed->to_file( "index.rdf", "UTF-8" );

print "Content-type: text/plain\n\n";
print "出力完了\n";

使ってるレンタルサーバーはロリポップです。

複数のフィード（RSS、Atomなど）をまとめるCGI
blog.audiofan.net/archives/491385.html
[Perl] XML::FeedPP - RSS・RDF・Atomフィードの解析・生成・変換・結合
www.kawa.net/works/perl/feedpp/feedpp.html
XML::FeedPP
https://metacpan.org/pod/XML::FeedPP#feed-remove_item-index-or-link
search.cpan.org/~kawasaki/XML-FeedPP-0.43/lib/XML/FeedPP.pm
294 名前：デフォルトの名無しさん mailto:sage [2014/06/10(火) 06:01:49.29 ID:hRaawaun]: >>293
WebProg
nozomi.2ch.net/php/
295 名前：デフォルトの名無しさん mailto:sage [2014/06/10(火) 12:30:22.68 ID:zpbxFFHG]: ttp://s1.gazo.cc/up/88224.jpg
こういった10行で一組のデータの中に
---
市民の...

yerles
warrior
---
というパターンが多くあります。
マッチ検索したいのは
---
市民の...

dog
warrior
---
というパターンです。
"市民"という文字を見つけたら
2行下に
"dog"という文字があるならば
その、"市民の..."を出力して欲しいです。

ファイル読んで単純マッチするぐらいしか今はできません
open (my $in , "<" , "./cdatan_5_101.s2");
while (<in>){
　　if (/yerles/){print "matched\n"}
}
close $in;

}
296 名前：デフォルトの名無しさん mailto:sage [2014/06/10(火) 13:44:16.05 ID:kKsVvptA]: >>295
ideone.com/0A9TR0
297 名前：デフォルトの名無しさん mailto:sage [2014/06/10(火) 13:58:26.18 ID:kKsVvptA]: 手抜きすぎた。

>>295
ideone.com/NUuEtp
298 名前：デフォルトの名無しさん mailto:sage [2014/06/10(火) 14:45:55.30 ID:zpbxFFHG]: 凄い。ありがとう。
出てきたshiftとか勉強してみます
感謝
299 名前：デフォルトの名無しさん mailto:sage [2014/06/11(水) 22:22:53.08 ID:PCU6+AOL]: どこにshiftの出番があるのか？と思ったらそう言うことか。
普通に配列に突っ込んで、マイナスのインデクスでアクセスすりゃいいやん。
$ perl -Mvars=@a -lne 'push @a, $_ ; next if !/dog/ ; next if $a[-3] !~ /市民/ ; print $a[-3]' File
メモリ喰いが気になるのなら、
$ perl -Mvars=%h -lne '$h{$.} = $_ if /市民/ ; next if !/dog/ ; next if ! defined $h{$. - 2} ; print $h{$. - 2}' File
とか、で節約すりゃいい。、、、けど、今時そんなの気にする必要もないだろ

上のワンライナーでやってる事は、
$ perl -MO=Deparse -Mvars...略
でわかる。
300 名前：デフォルトの名無しさん mailto:sage [2014/06/12(木) 13:15:46.45 ID:qt4Roz23]: 恰好をつけるなら、リングバッファでも書くところですが、回答としては、あんまりだと思ったので。
2行固定なら、別に使わなくても。
perl -ne '($_, $x, $y) = ($x, $y, $_); $y =~ /dog/ && /市民/ && print' File

何も考えなくていいなら、正規表現でバッサリ。
perl -e 'print((local $/ = <>) =~ /(^.*市民.*\n).*\n.*dog/gm)' File

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef