2ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

Perlコーディング初心者質問スレ Part 67

1 :nobodyさん:2013/01/18(金) 23:14:47.26 ID:???
Perlのコーディングで困ってる人のスレです。

【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。

1: 自分はこういう事がしたい。
2: それでこんな風にやってみたが・・・
3: こんなエラーが出て上手く行かなかった。

最低でも1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。

お勧めサイトは >>2 以降

前スレ http://kohada.2ch.net/test/read.cgi/php/1358342748/

2 :nobodyさん:2013/01/18(金) 23:15:29.65 ID:???
[本]
初めてのPerl 第6版 (リャマ): http://www.oreilly.co.jp/books/9784873115672/
プログラミングPerl 第3版 (ラクダ) : http://www.oreilly.co.jp/books/4873110963/ http://www.oreilly.co.jp/books/4873110971/
Effective Perl: http://ascii.asciimw.jp/books/books/detail/4-7561-3057-7.shtml
Perlクックブック 第2版: http://www.oreilly.co.jp/books/4873112028/ http://www.oreilly.co.jp/books/4873112036/
Perl ベストプラクティス: http://www.oreilly.co.jp/books/4873113008/
Perl Hacks: http://www.oreilly.co.jp/books/9784873113142/

[オンラインマニュアル]
最新のドキュメント: http://perldoc.perl.org/
perldoc きまぐれ訳: http://fleur.hio.jp/perldoc/
perldoc.jp: http://perldoc.jp/

[モジュール]
CPAN: http://search.cpan.org/
今どきのCPAN環境構築術(cpanm, perlbrew): http://gihyo.jp/dev/serial/01/perl-hackers-hub/000701

[テクニック]
Perl Hackers Hub: http://gihyo.jp/dev/serial/01/perl-hackers-hub
モダンPerlの世界へようこそ: http://gihyo.jp/dev/serial/01/modern-perl/0001
Perlメモ: http://www.din.or.jp/~ohzaki/perl.htm
Perlのページ: http://homepage1.nifty.com/nomenclator/perl/

[Perl Unicodeメモ]
Perl における Unicode のチュートリアル: http://perldoc.jp/docs/perl/5.16.1/perlunitut.pod
Perl Unicode の手引き: http://perldoc.jp/docs/perl/5.8.1/perluniintro.pod
http://www.rwds.net/kuroita/program/Perl_unicode.html
http://www.namazu.org/~tsuchiya/perl/perl-5.8.html
http://www.lr.pi.titech.ac.jp/~abekawa/perl/perl_unicode.html

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

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

5 :nobodyさん:2013/01/20(日) 17:45:46.95 ID:???
# [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)"; # ※1
use Encode;
# 次に、あなたが実行したい処理の内容を入れて下さい。
$file = 'C:/なんたら/かんたら.txt';
open my $fh, '<', encode("cp932", $file) or die $! ; # ※2
print <$fh>;
# 以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
# おまじないです。条件が異なる場合の対処方法は、ご自分で勉強して下さい。
# 【注】※1. の行を入れると、DOS 窓への日本語出力は簡便になりますが、
# ソースファイル名に非 ANSI 文字が含まれる場合に die 文の出力が失敗します。
# ※2. OS に渡す文字列(ファイル名,dos コマンドのオプションなど)は、
# この例のように cp932 でエンコードする必要があります。

6 :nobodyさん:2013/01/20(日) 18:12:39.89 ID:Fml29wQy
巨専か
いちおつ

7 :nobodyさん:2013/01/20(日) 21:45:41.27 ID:???
>>4
うまかっちゃん

8 :nobodyさん:2013/01/21(月) 13:03:48.02 ID:???
そもそもとんこつ系って何がある?

9 :nobodyさん:2013/03/09(土) 04:22:24.32 ID:wbHZMvtQ
age

10 :nobodyさん:2013/05/21(火) 02:45:40.79 ID:???
カップヌードル鶏しお オニオンヌードル ビッグってうまいんだけど
食べた後、ずっと匂うよね

11 :nobodyさん:2013/07/27(土) NY:AN:NY.AN ID:???
そそそそそそそそそ!

12 :nobodyさん:2013/11/15(金) 14:54:05.71 ID:Dsly13RC
とあるデータをケースによって変換したいんだけど、
例えば、$xにa,b,c,d・・・の文字が入ってるとして
a→林檎
b→バナナ
c→チーズ
d→デザート ・・・・ってな具合に。

一個一個置換演算するの面倒なんで、まとめて書く方法
ありますかね?

13 :nobodyさん:2013/11/16(土) 09:44:20.35 ID:???
>>12
%a=(
"a" => "林檎",
"b" => "バナナ",
"c" => "チーズ",
"d" => "デザート"
);
$x =~ s/([a-d])/$a{$1}/g;

14 :nobodyさん:2013/11/16(土) 13:02:40.98 ID:???
サンクス
$x=$a{$key}; で処理できました。

15 :nobodyさん:2013/12/12(木) 10:11:30.15 ID:???
XSS対策ですが、「”&<>;」の5つは判るのですが
「|(パイプ)」は何故禁則しないといけないんでしたっけ?
これをエスケープしたスクリプトをShift_JISで組むたびに
ポ掛芸など良く使う文字が化けてしまって困っています

16 :nobodyさん:2013/12/13(金) 01:04:57.83 ID:qGeT5+jK
>>15
パイプをエスケープしなきゃいけないといった人に
資料持っていって、お前バカじゃね?って言ってやれw

17 :nobodyさん:2013/12/13(金) 08:49:35.76 ID:???
どこで問題が起きるかきちんと分けてやれってことだよなw

><はopenでもHTMLでも問題があるけど、|はHTMLには関係ないw

18 :nobodyさん:2013/12/17(火) 13:19:40.18 ID:???
何でPerl厨ってあちこちの板でスレ乱立させてつまみ食いのように書き込むんだろうな。
キチガイしかいないのか?

19 :nobodyさん:2013/12/17(火) 15:34:55.50 ID:???
>>18
逆にきくけどキチガイ以外がperlを選ぶ理由は?

20 :nobodyさん:2013/12/17(火) 20:51:05.77 ID:???
>>15-17みればまともな奴がいないことは分かる

21 :nobodyさん:2013/12/18(水) 08:49:28.01 ID:???
ということにしたい工作

22 :nobodyさん:2013/12/18(水) 14:47:58.83 ID:???
>>15
パイプの替わりにシングルクォートをエスケープしとけ
あと、コマンドインジェクション対策ならパイプのエスケープは有効

23 :nobodyさん:2013/12/18(水) 17:51:32.23 ID:vVAEJlU0
XSS対策って書いてるの、見えないのかな?

24 :nobodyさん:2013/12/18(水) 18:33:22.92 ID:???
自己顕示欲を満たしたいだけだから何が書いてあるかは問題ではない。

25 :nobodyさん:2013/12/18(水) 23:06:52.10 ID:???
「体系的に学ぶ安全なWebアプリケーションの作り方」が達人出版会から発売されました。
http://blog.tokumaru.org/2013/11/drmpdf.html

26 :nobodyさん:2013/12/18(水) 23:07:56.87 ID:???
>>19 実用性につきる

27 :nobodyさん:2013/12/19(木) 11:12:46.44 ID:???
>>21
へぇ、糞スレ乱立させて前スレも大量に残ってるのに乱立スレに書き込むのがまともなのか
Perl厨のまともってそういうことだったのか

そりゃ>>15みたいな奴ばっかだろうよw

28 :nobodyさん:2013/12/19(木) 19:37:49.82 ID:???
>>27
全くそのとおりだ
ちゃんと飯の話題で有意義に盛り上がっている↓のスレ以外は不要
ttp://kohada.2ch.net/test/read.cgi/php/1358196208/

29 :nobodyさん:2013/12/19(木) 22:01:24.25 ID:???
>>15はまともだよ
まともなゴミw

30 :nobodyさん:2013/12/21(土) 17:41:59.60 ID:???
>>15はゴミというか精神障害の一種だろう。

31 :nobodyさん:2014/01/14(火) 03:53:34.84 ID:???
消えろクズが

32 :nobodyさん:2014/03/17(月) 00:51:40.71 ID:???
この板に常駐しているのって、&#31362;主みたいなもんだよね。

33 :nobodyさん:2014/03/19(水) 02:43:57.09 ID:9+/E7Nrg
&#31362;ってなに?

34 :nobodyさん:2014/03/20(木) 20:06:03.28 ID:???
ろう

35 :nobodyさん:2014/03/21(金) 02:38:24.32 ID:???
そのままググるとかできんの?

36 :nobodyさん:2014/03/21(金) 11:29:43.94 ID:???
そんなくろうは竹刀

37 :nobodyさん:2015/07/03(金) 21:51:13.46 ID:???
チェックで人を選んで、
選ばれた人だけにメールを送信するというプログラムを書きました。

@memberに送信者が代入してあります。
print SDML @member&#165;n
といった文です。

サーバを同じ会社内で変更しました。
phpは5.0から5.1に変わったようですが、
Perlに関しては何も知らされていません。

以前は問題なかったのですが、
特定の人が含まれた複数人にメールを送信しようとすると、
何時間たっても一定時間をおいて再送信が止まりません。
送信時間が9時だとしたら、
その後何時に受信しても9時送信として受信されます。
1時間に2通送信されることもあるようです。

何時間もたっているのに未だに繰り返されているようです。
cgiのパーミッションを調整しても、
ファイル名を変えても、
され続けてるようです。

その特定の人のアドレスはソフトバンクのキャリアメールで、
RFC規格に違反してない、
アルファベットと数字だけのアドレスです。

その人だけで送れば問題ない。
その人を含まない複数人へのメールも問題ない。
その人が含まれた複数人メールで発生する。

これは何が原因でしょうか?

38 :nobodyさん:2015/11/25(水) 22:45:47.89 ID:cYKN/vQC
xの2乗を x^2 と書いてた。
エラーが出ないのに計算結果がおかしく1日無駄にしたorz...

39 :nobodyさん:2015/11/26(木) 10:40:07.15 ID:FNI9fgRE
転職の際に必ず思い出してください。
下記の条件が全て当てはまる会社にご注意下さい。

・IT系 in 東京
・転職会議で2.5点
・転職会議の「その他>2ch情報」の欄で過去の労基2chスレが表示される

40 :nobodyさん:2015/11/26(木) 20:20:30.05 ID:???
Perlなあなたが苦労して取得した資格の平均最低月給ランキングは第何位?
民間や国家が認定している仕事の資格や免許。
その求人雇用市場での価値が一目瞭然で分かる。
(全求人情報平均最低月給196,500円)

ぼくらニッポンの民間・国家資格別平均最低月給ランキングはこれだ!

http://jobinjapan.jp/license/

41 :nobodyさん:2015/12/12(土) 16:52:11.72 ID:???
perl6ってクリスマスに出るの?

42 :nobodyさん:2016/02/05(金) 20:14:44.16 ID:C4/hcLrP
桐光学園中学校男子部 | 中学受験の情報サイト「スタディ」

彼女の顔と性行伊は画像で確認

★検索ワード「 稲城市立向陽台小学校評判Y子 」★

今年転校するので許してください。

桐光学園中学校評判 ザキシマ 結子

43 :nobodyさん:2016/02/12(金) 09:24:09.19 ID:PAIjEhN2
ある詐欺まがい会社が全国的に巧妙な騙しをやっています
その騙しの手口を書いて2chでみなさん「こういう手口で冷ます業者に気をつけて」という
警戒分を書いてる方が多く居るのです、運営側はその公益性を認めて削除しないでいて
くれるのですが詐欺業者は、その事が気に喰わないらしく(まして警察にも訴えられない)ので
その警戒を書いたスレッドをあっというまに、一番上から最底辺(スレッドの番号700くらい)
まで落としてしまう技術を使ってます。
しかし削除はされないので被害者の方がまたageるのですが、いったいどういうワザを使うのでしょう?
最低に沈める方法で「soko」って言うのが一時噂されましたがガセネタみたいです
最低の700から板のtopにあがって来た後に必ず
****************************
板復帰(NG!:Gather .dat file OK:NOT moving DAT 723 -> 723:Get subject.txt OK:Check subject.txt 723 -> 723:fukki NG!)load averages: 1.72, 1.92, 1.98
sage Maybe not broken
*****************

っていう表示が出てます。お願いします。詐欺まがい業者が、運営に削除依頼出しても
公益の為に削除されないので、こまめにスレッドの最底辺に沈めてるんだと思うんです。

44 :nobodyさん:2016/03/06(日) 19:39:56.36 ID:WSzGy6+N
フリー配布のメッセージフォーム(kentさんとか)を使っていて(cgiやpl関係も配布のもの)
今までずっとmethod="get"で使っていたことに気が付きました
postにあらためたいのですが、単にHTML上で
method="post"に書き換えるだけでOKでしょうか?

45 :nobodyさん:2016/03/07(月) 07:34:02.24 ID:???
kentなんてまだ使ってるのかよ。
kent使っていいのは2000年までだぞ。

46 :nobodyさん:2016/03/07(月) 21:39:08.81 ID:???
そんなこと言わずに

47 :47:2016/03/23(水) 03:45:14.54 ID:+d73fG5p
PerlでCGIの勉強をしています。
フォームで文字列入力→入力された文字列を表示、としたいのですが、
日本語だけ文字化けしてしまいます。
鯖のPerlのバージョンは5.18.1です。

できるだけモジュールを追加せずにやりたいのですが、
何か方法はありますか?

ソースを載せるので、何か気になる点があれば指摘して頂けると助かります。
次レスからソースです。

48 :47:2016/03/23(水) 03:46:54.60 ID:+d73fG5p
規制されてしまった?

49 :nobodyさん:2016/03/23(水) 10:33:37.94 ID:???
>>47
標準で付属しているモジュールを使え

50 :47:2016/03/23(水) 17:16:11.81 ID:3/m6T+pC
何か禁止ワードとやらで、ソース載せられないみたいなのでファイルのURL貼ります。
POSTを使って、データを渡そうとしています。
アルファベット(abcなど)では問題無く動くのですが、
日本語だけ正しく表示されません。

ttp://fast-uploader.com/file/7014228125322/

ファイルは1つです。
行数は42行です。

51 :47:2016/03/23(水) 17:22:05.42 ID:3/m6T+pC
この状態でPOSTから「あいうえお」といった文字列を渡すと、
変換後:name=31231431631831A
と表示されてしまいます。

Perl単体でURLエンコード・デコードを試したところ、正常に動いたのですが、
CGIにすると正常に動きません。

use utf8を使っていますが、最初は使っていませんでした。
その状態で正常に動かないため、色々試して、今はuse utf8をつけています。

52 :47:2016/03/23(水) 18:19:20.51 ID:3/m6T+pC
すいません自己解決しました。
単純にコードが間違っていました。
URLデコードの部分で間違ってました。

53 :nobodyさん:2016/04/16(土) 16:30:20.68 ID:???
MacのOS X El Capitan 10.11.4.を使って、そこに入っているperl(v5.18.2)を使っています。
以下のようなコード(問題点だけに刈り込んであります):

use utf8;

binmode STDIN, ":utf8";
binmode STDOUT, ":utf8";

@line = <>;
$lines = join "", @line;
$lines =~ s/今すぐ聴く//;

入力はlynx的なものでwebのページをテキストとして取ってきたものをパイプで流し込んでいます(automatorの"get specified URLs")。

で最後の行のマッチが入力データ内の「今すぐ聴く」とマッチしません。
いろいろためしてみると「ぐ」がマッチしません。
マッチストリングの「ぐ」を . にすればマッチします。
他にも「で」がマッチしません。

どこが間違っていますか?これをマッチさせる方法はありますか?

ソースはautomatorの上で書いています("run shell script"の欄の中)。

私の推測ですがMacはファイル名がunicodeのNFD(「か」+「゛」)ですがW3CはNFC(「が」)だということなので、これが原因ではないか?
なのでMac内ではすべてNFDつまりperlのソースコードもNFDなのでマッチしないのでは、と思い始めていますが
これ以上は私には検証しようがありませんでした。

54 :nobodyさん:2016/07/11(月) 18:36:56.34 ID:???
あるサイトからTreeBuilder使って任意の情報を抜き出そうとしてます。
対象のサイト内で、Ajax使ってiframeなんかで遅延表示している文字列も含めて
最終的に表示されている文字列を取得したいんですが良い方法ありますか?
(Ajaxで定期更新してる場合はとれるタイミングは問わず)

55 :nobodyさん:2016/07/15(金) 19:55:04.46 ID:???
画像掲示板をカスタマイズして使っておりますが、
Windows10のIEで投稿した場合、投稿後に、
「フォームを再送信しますか」という確認が出ます。

これを回避するにはどうしたらいいでしょう?

56 :55:2016/07/16(土) 09:09:24.29 ID:???
refreshでリロードせずに、一旦別ファイルに飛ばして戻すようにしました。

57 :nobodyさん:2016/08/29(月) 21:41:30.50 ID:???
昔作者のHPで配布されてたjcode.pl の作者公式ベータ版は v2.13.1 v2.13.2 v2.13.3 の3つだけでしたっけ?
本業は翻訳家らしい歌何とか先生のホームページを何年ぶりかにググって見てみたらよく分からない日記帳になってて
jcode.plの痕跡すらないので気になって。
今更jcode.plもないだろうってことで2.13までしかないFTPサイト以外消しちゃったんかな?

58 :nobodyさん:2016/08/30(火) 22:47:26.91 ID:???
そりゃなぁ、Perl本体にjcodeよりも
優れたモジュールが入ってるんだから

59 :nobodyさん:2016/08/31(水) 05:22:07.25 ID:Ll8Sc0gQ
作者のHPのURLを入れれば見れる可能性が微レ存
http://archive.org/web/

60 :nobodyさん:2016/09/01(木) 23:09:15.37 ID:???
当時jcode.plは空気のように当たり前の存在だったから
密かに置いてあったベータ版もWEB ARCHIVEに保存されている可能性は高いけど
まず当時の作者URLを見つけるところから始めないとなw

でも jacode.pl がjcode.plの改良品なんだから
多分jcode.plベータ版の機能も含んでいるはずだよ

61 :nobodyさん:2016/09/01(木) 23:59:03.66 ID:???
jacodeググって見つけました。
http://d.hatena.ne.jp/foussin/20111218/1324157166

jcode.pl (Perl4) → jacode.pl (Perl4) → Jcode.pm (Perl5) → Encode.pm (Perl5.8 標準モジュール)

ってことで、Encode.pmを使うのが良いみたいですね。

62 :nobodyさん:2016/09/03(土) 08:06:07.38 ID:???
http://web.archive.org/web/20090608103250/http://srekcah.org/jcode/2.13.0/

見つけたぞオラァ!

63 :nobodyさん:2016/10/15(土) 10:20:50.06 ID:???
Fedora24server Perl v5.22.2です。

# /usr/bin/perl
use bigint;
Can't locate bigint.pm in @INC (you may need to install the bigint module)

と出た場合は何かインストールしなければならないでしょうか。
試しに↓やってみましたが、変化無しです。

dnf -y install perl-Math-BigInt-GMP-1.49-2.fc24.x86_64

find / -name bigint.pm でも見つかりませんでした。

64 :nobodyさん:2016/10/15(土) 12:43:37.58 ID:???
よく見たらほとんど休眠スレじゃんw

自決。↓でOKでした。

dnf -y install perl-core

65 :nobodyさん:2017/01/13(金) 16:17:07.94 ID:tq2JtwE6
PerlでSMTPで複数人にメールを送信する時、
toに配列を指定すると受信者のto欄がレンタルサーバーのプロキシーアドレス?になってしまいます。
メール自体は届く人に正しく届いています。

$mail_header .= 'To: '.@JUSINSHA.

66 :nobodyさん:2017/01/13(金) 16:26:27.79 ID:???
$mail_header .= 'To: '.@JUSINSHA."\n";
$SMTP->to(@JUSINSHA);

このようにしてますが、
@JUSINSHAをどうすれば良いのでしょうか?

67 :nobodyさん:2017/01/13(金) 19:11:21.12 ID:???
もう一つ教えてください。
文字コードはUTF-8なんですが、
メールで受信した時チェックボックスの値だけ文字化けしてしまいます。
PC画面に表示させると内容は含まれています。
encode/decodeかけると何かの数字になってしまうようです。

チェックボックスの値をメールで表示させるにはどうしたら良いですか?
CGI.pm, SMTP, Encode.pm使ってます。

68 :nobodyさん:2017/03/17(金) 10:11:40.59 ID:lrxaHVm8
&#11014;&#65038; これOKにするにはどうしたらいいの?

69 :nobodyさん:2017/03/30(木) 23:05:13.55 ID:???
>>68
死ねばいいと思うよ。

70 :nobodyさん:2017/04/05(水) 18:08:07.41 ID:bjPams70
>>68
HTML::Entities を使う

20 KB
新着レスの表示

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50
名前: E-mail (省略可) :


read.cgi ver 05.02.02 2014/06/23 Mango Mangüé ★
FOX ★ DSO(Dynamic Shared Object)