Perlコーディング初心者質問スレ Part 58
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
2008/08/06(水) 22:54:32ID:???【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。
1： 自分はこういう事がしたい。
2： それでこんな風にやってみたが･･･
3： こんなエラーが出て上手く行かなかった。
最低でも1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。
お勧めサイトは >2 以降
前スレ http://pc11.2ch.net/test/read.cgi/php/1203935151/
過去ログ倉庫 ttp://user.ftth100.com/mirrorhenkan/perl/
0577nobodyさん
2009/01/18(日) 00:35:38ID:???#!/usr/bin/perl -w
use strict;
package Foo;
sub Bar::speak { __PACKAGE__, ' says ', uc pop, "\n" }
package Bar;
sub Foo::speak { __PACKAGE__, ' says ', lc pop, "\n" }
package main;
print Foo::speak('FOO'), Bar::speak('bar');
__END__
ただしこんな事をしなければいけないようなら設計が悪い。
0578nobodyさん
2009/01/18(日) 00:42:15ID:???0579nobodyさん
2009/01/18(日) 00:42:29ID:???0580nobodyさん
2009/01/18(日) 02:00:40ID:???code => sub {warn "hoge\n"},
into => 'Hoge',
as => 'say_hoge'
});
0582nobodyさん
2009/01/18(日) 14:33:21ID:???0584nobodyさん
2009/01/18(日) 23:39:26ID:???a
b
c
2.txtの中身
d
e
f
↓一行おきに2.txtの中身を挿入したい
a
d
b
e
c
f
先生教えて!
0585nobodyさん
2009/01/19(月) 00:00:53ID:???use warnings;
use FileHandle;
my $a = FileHandle->new("< a.txt");
my $b = FileHandle->new("< b.txt");
while (!$a->eof && !$b->eof) {
print $a->getline;
print $b->getline;
}
0586nobodyさん
2009/01/19(月) 00:20:53ID:???0587nobodyさん
2009/01/19(月) 00:46:38ID:???FileHandle なり何なりを使わない場合の利点があれば教えて欲しい。
0589nobodyさん
2009/01/19(月) 00:52:38ID:???0591nobodyさん
2009/01/19(月) 01:02:16ID:???use strict;
use warnings;
open my $txta, '<', 'a.txt' or die 'not found a.txt';
open my $txtb, '<', 'b.txt' or die 'not found b.txt';
while (defined (my $ta = <$txta>) and defined (my $tb = <$txtb>)) {
print $ta;
print $tb;
}
0592nobodyさん
2009/01/19(月) 08:55:47ID:???use strict; つけることすら無駄になるよね。
どうなのそれ。
0593nobodyさん
2009/01/19(月) 09:02:22ID:???0594nobodyさん
2009/01/19(月) 09:08:59ID:???strictはプラグマだから負荷かからないと思ってたけど違うの？
数値的にどれくらい負荷になるの？
0595nobodyさん
2009/01/19(月) 09:09:55ID:???use strict してなくてもかまわんかもしれんなｗ
0596nobodyさん
2009/01/19(月) 09:21:58ID:???以下コピペするよ
> ところで、気になるオブジェクト指向実装における Perl スクリプトの実行
> 速度ですが、Damian Conway 氏による『オブジェクト指向Perlマスターコー
> ス―オブジェクト指向の概念とPerlによる実装方法』の序章にこうあります。
>
> > 一般には、オブジェクト指向Perlによるシステムの実装は、それと等価の
> > 非オブジェクト指向実装よりも高速になることはなく、実際には比較して
> > 通常20〜50パーセントほど低速になる。
> > この数字はオブジェクト指向Perlから多くのユーザを遠ざけるほど十分に
> > 大きいかもしれないが、オブジェクト指向の設計面および実装面のそれを
> > 補うさまざまなり点を見逃すのは悲劇的である。
> > (中略)
> > 残念ながら多くの人は、「20〜50パーセントの低速化」という数字に惑わ
> > され、過去6か月間でプロセッサ速度が2倍になったにもかかわらず、何を
> > 意味しているか忘れがちになる。
0597nobodyさん
2009/01/19(月) 09:28:43ID:???(1) CGI を速度重視で修行のように書く perl
(2) Moose とか使う oop perl
のどちらかだと思う。
(1) で use strict なしとかだと首つるしかなくね？
0598nobodyさん
2009/01/19(月) 09:34:37ID:???世の中にはおかしな本もあるようでｗｗｗ
0599nobodyさん
2009/01/19(月) 09:37:37ID:???俺には無理。
0600nobodyさん
2009/01/19(月) 09:44:29ID:???「趣味のプログラムだから、最悪バグっても構わない」
的なこと書いて逃げるよね。
どうしようもない奴らであることは確かだな。
馬鹿はおとなしくマークアップエンジニアとかやってればいいのにな。
0601nobodyさん
2009/01/19(月) 11:17:25ID:???0602nobodyさん
2009/01/19(月) 12:00:06ID:???0603nobodyさん
2009/01/19(月) 12:03:05ID:???つまんないから馴れ合い irc で引きこもっとけよ。
0606nobodyさん
2009/01/19(月) 12:49:52ID:???httpdから見えるところに置いてるのか
0607nobodyさん
2009/01/19(月) 12:52:42ID:???売り上げ毎に個別のＩＤ付けて、売り上げデータだけサーバに残し、
個人情報は残さない。
個人情報+個別ＩＤをメールで自分に送る。
0608nobodyさん
2009/01/19(月) 13:11:12ID:???レンタル鯖なんだから、httpdから見えないところには置けない・・・と思う。
>>607
メールで個人情報送るのって、案外危ないのでは？
俺は客宛に自動送信するメールにも、住所とかは完全な形では書かないよ
0614nobodyさん
2009/01/19(月) 13:29:05ID:???レン鯖を使うのが今の俺に取ってはベターだとは思ってる。
最悪、なにか事故が起こったら謝ってしまえばいいだけ。
本題に戻れば、カートをどんな方法で動かしてるかとか、内部仕様的なところは客には見えないから、
ちょっと見栄えのする画面だったら何でもいいんだよｗ
まあレン鯖だということは分かっちゃうことになるけど、そんなこといちいち調べて買い物しないでしょ？
0616612
2009/01/19(月) 13:36:00ID:???0617nobodyさん
2009/01/19(月) 13:36:40ID:???> 内部仕様的なところは客には見えないから、
どこかで配布されてるスクリプトをちょっといじっただけの程度なら
内部仕様バレバレでっせｗ
もうすでに流出してるかもわからんね。
クレカの大量不正利用がある日起こってみんな気がつくとｗ
0619nobodyさん
2009/01/19(月) 13:38:54ID:???客のＩＤとパスワードが、何らかの理由で漏れたときに、注文時のメールアドレス変えて
第三者に漏れる可能性があるかなという理由なんだよ。
0620nobodyさん
2009/01/19(月) 13:40:17ID:???スクリプトは１から自分で書いたよ。だから怪しいわけだけどｗ
クレカなんて扱わないよ、そこまで大規模なら、システムにも金かけるでしょ。
0621nobodyさん
2009/01/19(月) 13:40:25ID:???0622nobodyさん
2009/01/19(月) 13:41:33ID:???クレカ扱うと大規模なの？ｗ
0623612
2009/01/19(月) 13:49:40ID:???そーゆー事か。
うちは、会員制（登録制）にしていないから、IDもPASSも無い。
>>618
大概はいいすぎたか。うちはメールサーバーと自宅の間は大丈夫。
ttp://www.rhein-strasse.de/blog/2004/06/19/becky2-ssl-tls/
0624nobodyさん
2009/01/19(月) 13:54:25ID:???でも常連客でも会員登録してくれない客はいるね。
弱小だから、信用されてないのは仕方ないけど。
でも、会員登録の有無は関係なく、個人情報がサーバーに残ってることを客は知らんわなｗ
0625nobodyさん
2009/01/19(月) 13:57:51ID:???客を馬鹿だと思ってるの？
キミは何も知らないようだから、クラックされるなり変な script 注入されるなりして痛い目にあえばいいと思う。
0626nobodyさん
2009/01/19(月) 14:00:50ID:???店宛にエラーの内容をメール送信する機能つけてるわ
0627nobodyさん
2009/01/19(月) 14:05:36ID:???とか言う人が
> そういえば、つまらない対策だけど、想定外の動作をしたときに、
> 店宛にエラーの内容をメール送信する機能つけてるわ
そんな機能つけてどうするの？自信ないの？腰抜けなの？
0628nobodyさん
2009/01/19(月) 14:11:06ID:???Amazonは余裕で個人情報+購入商品のメール送ってくるのなｗ
0631nobodyさん
2009/01/19(月) 14:21:51ID:???0632nobodyさん
2009/01/19(月) 14:26:19ID:???0633nobodyさん
2009/01/19(月) 14:28:12ID:???本当は住所は書いたメールを送りたい。間違えて入力する客がたまにいるから。
でも、住所を書くことのリスクを負うことを考えると、やっぱり書けないね。
間違えて入力する客が悪いんだし。
0634nobodyさん
2009/01/19(月) 14:29:26ID:???> 間違えて入力する客が悪いんだし。
論理が一貫していませんよ。
0636nobodyさん
2009/01/19(月) 14:41:05ID:???「クラックしてみろ」とか「保存してある個人情報抜けるなら抜いてみろ」とか
ほしいものだ。
結局小心者の腰抜けなんですね。わかります。
0637nobodyさん
2009/01/19(月) 15:40:28ID:???・配布スクリプトは使わない
・プレーンテキストで保存しない
・ファイルならhttpdから見えないところに置く
・メールに個人情報は載せない
・事故が起こったら謝る
こんな感じにすればいいってことですか？
0638nobodyさん
2009/01/19(月) 15:50:20ID:???0639nobodyさん
2009/01/19(月) 15:50:35ID:???0640nobodyさん
2009/01/19(月) 17:04:42ID:???を追加してくれｗ
ttp://slashdot.jp/article.pl?sid=07/12/15/0035257
0642nobodyさん
2009/01/19(月) 19:02:39ID:???みんなバカなのか？わざとだろ？
0643nobodyさん
2009/01/19(月) 20:24:49ID:???0644nobodyさん
2009/01/19(月) 20:44:17ID:???0645nobodyさん
2009/01/19(月) 20:47:03ID:???ここより過疎で雑談に適したスレは他にも沢山あるから
自由にリサイクルしてくれ。
【総合】 Webprog板質問雑談スレッド 1
http://pc11.2ch.net/test/read.cgi/php/1131016915/
ｺﾚｶﾗWebProgｵ勉強ｼﾖｳﾄｼﾃﾙ香具師ｶﾞ雑談ｽﾙｽﾚ
http://pc11.2ch.net/test/read.cgi/php/1049476765/
0646nobodyさん
2009/01/20(火) 01:15:18ID:???中級者向けの本を教えてくだしあ。基礎やcpan巡りはできるようになったけど、その先、みたいな。
0647nobodyさん
2009/01/20(火) 01:30:22ID:???0648nobodyさん
2009/01/20(火) 01:41:50ID:???皆さんだったらどんなのを使います？
自分は今、SOAPとかってどうなんだろう？と思ってるしだいです。
最悪返すデータが格納されてるURLを投げる方向だったりしますがｗ
0652nobodyさん
2009/01/20(火) 20:20:07ID:???0653nobodyさん
2009/01/21(水) 03:44:02ID:eckl057E{
package Hoge;
use strict;
use warnings;
sub sub1 { print "sub1\n" }
}
{
package main;
use strict;
use warnings;
no strict 'refs';
my $hoge1 = *{"Hoge::sub1"};
$hoge1->();
my $class = 'Hoge';
my $hoge2 = *{"$class::sub1"};
$hoge2->();
}
# 前者が上手くいき、後者が上手くいかない理由と、
# 後者の代替となる方法を教えて頂けないでしょうか?
0654nobodyさん
2009/01/21(水) 04:53:39ID:???そして馬鹿 perler と呼ばれるわけですね。
0656nobodyさん
2009/01/21(水) 09:03:09ID:???my $hoge2 = *{"$class\::sub1"};
0657nobodyさん
2009/01/21(水) 10:38:00ID:dhsSLEKy0658nobodyさん
2009/01/21(水) 10:43:42ID:???0660nobodyさん
2009/01/21(水) 16:59:05ID:???0661660
2009/01/21(水) 17:03:30ID:???書き換えて、そのアプリを再起動させたいのです。
0662nobodyさん
2009/01/21(水) 17:33:53ID:???0664nobodyさん
2009/01/22(木) 09:37:23ID:???掲示板に改造しようと思っているのですが、
さすがに素のまま設置するのはスパム投稿で酷い目に会いそうな気がします。
スパム投稿対策にはどういうのを施せばいいのか良くわかりません。
モダンなスパム対策にはどういうのがあるのでしょうか？
良ければ参考になるようなものをご教示お願いします。
0665nobodyさん
2009/01/22(木) 10:21:48ID:???ssl
0666nobodyさん
2009/01/22(木) 10:31:08ID:???0667nobodyさん
2009/01/22(木) 10:57:51ID:???0668nobodyさん
2009/01/23(金) 08:02:36ID:???0669nobodyさん
2009/01/23(金) 13:40:01ID:???モダンPerl入門
http://www.amazon.co.jp/dp/4798119172/
0670nobodyさん
2009/01/23(金) 15:30:04ID:???0671nobodyさん
2009/01/23(金) 15:50:35ID:???0672nobodyさん
2009/01/23(金) 16:25:33ID:???0673nobodyさん
2009/01/25(日) 14:28:30ID:???0674nobodyさん
2009/01/26(月) 12:57:03ID:???､ ヽ
|ヽ ﾄ､ ﾄ､ ﾄ､ ､.`、
/|l. l. | |l l | | l |l.| |l. l
/' j/ ﾉ|ﾙ'/ﾚ〃j/l |
-‐7" ヾー---┐|_.j
￣ ./ﾞﾆ,ﾆF､'' ｌ _ヽ
:: ,.,. |ヽ 」９L.` Ｋ }.|
ｌ' """ ｌ ) /
ｈ､,.ﾍ. ﾚ'/
ﾚ′
r.二二.) /
≡≡ ,ｲ
. ／ !
＼ ／ ├､
::::::｀￣´ / !ハ.
0675nobodyさん
2009/01/26(月) 18:15:16ID:???ググってみたんですが、ローカルの画像を加工して保存する方法ばかりで、
他のウェブサイトから画像を取得→加工→表示する方法がわかりません。
参考になるサイトでもいいので、どなたか教えてもらえませんか？
0676nobodyさん
2009/01/26(月) 18:22:23ID:???（２）加工→表示
■ このスレッドは過去ログ倉庫に格納されています