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

**nobodyさん** · 2005/10/17(月) 00:47:17

Perlのコーディングで困ってる人のスレです。

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

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

最低でも1と3が無いと誰も答えられないよ。
ソース貼る時は、全角スペースでインデント忘れずに。
良い回答は良い質問から。一緒に勉強しましょう。

過去ログやお勧めサイトは >>2-10

**nobodyさん** · 2005/10/17(月) 00:47:57

関連スレ
CGI: Common Gateway Interface part 13
http://pc8.2ch.net/test/read.cgi/php/1126436361/

【Perl,CGI】参考書籍第三版
http://pc8.2ch.net/test/read.cgi/php/1030209573/

【Perl】ファイルロック(排他処理)について語ろう
http://pc8.2ch.net/test/read.cgi/php/1024795138/

★負荷軽減対策委員会（Perl、PHP)★
http://pc8.2ch.net/test/read.cgi/php/1034645635/

Perlモジュールについて
http://pc8.2ch.net/test/read.cgi/php/997829243/

CGIに依存しないPerlの話題一般/Part2
http://pc8.2ch.net/test/read.cgi/php/1030548610/

★三　【スクリプト改造工房 PART 8 】　★三
http://pc8.2ch.net/test/read.cgi/php/1077525387/

【スクリプト改造依頼スレ】(丸投げ) part4
http://pc8.2ch.net/test/read.cgi/php/1127916965/

**nobodyさん** · 2005/10/17(月) 00:48:29

［過去ログ] 1 of 4

Part1　http://tako.2ch.net/test/read.cgi?bbs=perl&key=957208980　参照不能
　DAT: http://tako.2ch.net/perl/dat/957208980.dat
Part2　http://tako.2ch.net/test/read.cgi?bbs=perl&key=971817087　参照不能
　DAT: http://tako.2ch.net/perl/dat/971817087.dat
Part3　http://tako.2ch.net/test/read.cgi?bbs=perl&key=979894521　参照不能
　DAT: http://tako.2ch.net/perl/dat/979894521.dat
Part4　http://tako.2ch.net/test/read.cgi?bbs=perl&key=984430156　参照不能
　DAT: http://tako.2ch.net/perl/dat/979894521.dat
Part5　http://pc.2ch.net/php/kako/988/988728069.html
Part6　http://pc.2ch.net/php/kako/996/996075607.html
Part7　http://pc.2ch.net/php/kako/1000/10002/1000267444.html
Part8　http://pc.2ch.net/php/kako/1003/10039/1003900311.html
Part9　http://pc.2ch.net/php/kako/1009/10095/1009549309.html
Part10 http://pc.2ch.net/php/kako/1014/10145/1014556702.html

**nobodyさん** · 2005/10/17(月) 00:49:52

**nobodyさん** · 2005/10/17(月) 00:50:39

［過去ログ] 3 of 4

part21 http://pc2.2ch.net/php/kako/1047/10479/1047980851.html
part22 http://pc2.2ch.net/php/kako/1050/10503/1050369328.html
part23 http://pc2.2ch.net/php/kako/1053/10530/1053051519.html
part24 http://pc2.2ch.net/php/kako/1054/10549/1054992610.html
part25 http://pc2.2ch.net/php/kako/1056/10567/1056730690.html
part26 http://pc5.2ch.net/php/kako/1059/10590/1059043704.html
part27 http://pc5.2ch.net/php/kako/1060/10608/1060808783.html
part28 http://pc5.2ch.net/php/kako/1063/10635/1063562491.html
part29 http://pc5.2ch.net/php/kako/1066/10662/1066286828.html
part30 http://pc5.2ch.net/test/read.cgi/php/1069846177/

**nobodyさん** · 2005/10/17(月) 00:51:22

**nobodyさん** · 2005/10/17(月) 00:52:36

ム板Perlスレより 1 of 2

[プログラミング自体の経験が無い奴はまずココを読め]
Perlプログラミング講座: http://www.site-cooler.com/kwl/perl/

[本]
リャマ: http://www.oreilly.co.jp/books/4873111269/
駱駝: http://www.oreilly.co.jp/books/4873110963/
Effective Perl: http://www.ascii.co.jp/books/detail/4-7561/4-7561-3057-7.html
クックブック: http://www.oreilly.co.jp/books/4873110378/

[オンラインマニュアル] (追加)
最新のドキュメント: http://search.cpan.org/~nwclark/perl-5.8.7/
perl5.8.xのドキュメント(一部): http://www.kt.rim.or.jp/~kbk/perl-5.8/
perl5.005_03 のドキュメント: http://www.kt.rim.or.jp/~kbk/perl5.005/
日本語ドキュメント検索: http://search.cpan.jp/
perldoc.jp: http://www.perldoc.jp/
Perldoc.com: http://www.perldoc.com/

**nobodyさん** · 2005/10/17(月) 00:53:16

ム板Perlスレより 2 of 2

[モジュール]
CPAN.com: http://search.cpan.org/
河馬屋二千年堂: http://homepage3.nifty.com/hippo2000/

[テクニック]
Perlメモ: http://www.din.or.jp/~ohzaki/perl.htm
Perlのページ: http://homepage1.nifty.com/nomenclator/perl/
Perlの小技: http://homepage3.nifty.com/hippo2000/perltips/index.htm

[Perl5.8Unicodeメモ]
http://www.pure.ne.jp/~learner/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

関連スレ

正規表現道場@2ch Part4
http://pc8.2ch.net/test/read.cgi/php/1105930285/

**766** · 2005/10/17(月) 00:55:59

>>997
すいません。。ほんとに。おいらが悪いんです。ごめんなさいです。

**nobodyさん** · 2005/10/17(月) 01:08:17

前スレ999ﾜﾗﾀ

**nobodyさん** · 2005/10/17(月) 01:42:22

全然勉強してないうえ仕事でわかんなくて悩むんだったら、
誰か (ちゃんとしたスクリプトを書いてくれるとこ) に依頼した方が会社もお前もいい判断だろうに。
1～2週間やそこら悩んでできないくらいだったらそのほうがはるかにコストパフォーマンスがよいハズ。
つかそんなことで雇ってもらえてるのが、何ていうか、うらやましい。

**nobodyさん** · 2005/10/17(月) 01:48:57

同じく、前スレ999ﾜﾗﾀ

**766** · 2005/10/17(月) 01:57:00

>>11

おっしゃるとおりです。おいらもできるってゆっちゃったのがいけなかったんです。ほんとに前スレの999ですね。。。情けないです。

**766** · 2005/10/17(月) 01:59:05

色々調べて何回もいろんなソース試したりしてここまでやったんですが、、もうだめぽ。。泣

今回だけマジで助けてほしい。。お願いします。

**nobodyさん** · NG

めずらしくこのスレ盛り上がってるじゃん。うれしいよ。。

**nobodyさん** · 2005/10/17(月) 02:20:21

まだ766はいるのかな？
まだ出来てないなら要点まとめて頂戴。

まずは、送信したフォームの情報が正しく所得できているのか。
↓
POSTでなく、GETで値をみられるようにする。

データを保存する方法はわかっているのか。
↓
変数に入れた文字が保存できたのか調べる。

**nobodyさん** · 2005/10/17(月) 02:43:10

すみません、教えていただきたいのですが。
買い物などのWEBで、検索や完了まで時間がかかるとき、「ただいま検索（登録）中です」のような一時的画面を表示させたいのですが、
perlではどのような方法があるでしょうか？
一定時間（例えば１分とか）は、特定の一時ページを表示して、
完了した時に完了ページを表示するものをイメージしています。
javaなどでは時々このようなページを使っているとこがあるのですが。。。。

一応、小枝とかその他有名なサイトは見たんですが、
こういう点での会報がわからなくて。。。。

**766** · 2005/10/17(月) 02:50:52

>>16

すいません。ありがとうございますです。

・送信したフォームの情報はexcelで開いたとき、名前が文字化け（EUCでやってるからだと思いますが、解決策わからず。。）

・変数にいれた文字（回答番号　1とか2とか）はcsvに数字で保存できています。

【お手上げ】

・前スレ　>>981 に書いたような並びでexcelに保存ができなし。。
・名前をいれてなかったらエラー（送信できない）ようにしたい。

です。何卒ご指導お願いいたします。。まじですいません。

16 · 2005/10/17(月) 03:04:21

まず、先にこれだけいっておきます。
「エクセルは関係ない」。
エクセルで読める表示形式で保存したいって言うのは最後の手段で、今はそこまでいってないので頭から忘れてください。

送信する
↓
データを受け取る
↓
ファイルに保存する

第一段階でHTMLのメソッドをgetに・・・

って現段階のコード、どっかにアップしてもらったほうが早そうね。
もうちょっと常駐しとく。

16 · 2005/10/17(月) 03:21:03

納期遅れのいいわけ考えながら寝ちゃったのかな？

**nobodyさん** · 2005/10/17(月) 03:41:01

>>19
現段階のコードは前スレに。
参考にやり取りを列挙すると
前スレ http://pc8.2ch.net/test/read.cgi/php/1123777607/ の
Q >>922-925
A >>931,932
Q >>936-938
A >>950
Q >>954-956
A >>958
Q >>981,982-986 (現状の全ソース)

その要件を実装するのはすぐにできるけれど、
完成物を渡してしまっても766のためにはならないしな…

**nobodyさん** · 2005/10/17(月) 03:51:17

というかまず766は出来ないことは「できない」と言う事を学ぶべきだと思う
じゃないとまた同じ事繰り返す羽目になる

16 · 2005/10/17(月) 04:19:43

暇でネタもないので、とりあえず作ってみてる。

**nobodyさん** · 2005/10/17(月) 04:40:35

>>23
おまい、いいやつだな

**766** · 2005/10/17(月) 04:40:42

>>21

レス有難うございます。
ヒントだけでも結構です。。後はもちろん自分でなんとか完成させるつもりです。

何卒宜しくお願いいたします。

**nobodyさん** · 2005/10/17(月) 04:45:09

>>17
それ、perlとは関係ないだろう。
meta refresh か JavaScript 使いなされ。

**766** · 2005/10/17(月) 04:54:56

現状のソースをアップしますた。

http://www.nextftp.com/sentobeat/

皆さんに頼りっぱなしなのもわかっております。
ヒントだけでもいただければもちろん自分でもなんとかするようにします。

なんとか宜しくお願いいたします。。マジ泣

16 · 2005/10/17(月) 05:03:25

最初のファイルを編集してるので。
希望動作は最初のとおりでいいのよね？

16 · 2005/10/17(月) 05:12:34

アプロダの指定よろ

**766** · 2005/10/17(月) 05:13:39

>>28

まじですか　ほんとに有難うございます。。

はい。希望動作は >>18 に書いたものです。

今なんとか自分でもとりあえずエラー機能をつけようと思って
#入力チェック
if ($in{name} eq '') { &error('名前を入力してください',''); }

を頭につけてみたんですが、動きませんでした。。orz

何卒宜しくお願いいたします。

**766** · 2005/10/17(月) 05:16:11

>>29

ありがとうございます。

http://other.free-uploader.com/up/　

でお願いしますです。

16 · 2005/10/17(月) 05:30:28

とりあえずあぷ
ソース汚いままだけど保存はちゃんとされるはず。
読みにくかったfont　size=2はスタイルに勝手に変えちゃったままですが。

16 · 2005/10/17(月) 05:32:40

やばっ、フォントの閉じたぐ全部消しちゃってるｗ

16 · 2005/10/17(月) 05:41:52

Lintで怒られまくったので、最低限もとのHTMLになるように戻しておきますた。

**766** · 2005/10/17(月) 05:42:40

>>16

有難うございますです。マジで感謝です。

今試してみたんでうが、動かない。。泣
パーミッションもなおしますた。

はじめのはquestion_1.inc っていうふぁいると連動してたんですが、
作っていただいたものは関係ありますか？

question_1.cgiにいきなりアクセスですよね？

16 · 2005/10/17(月) 05:44:24

あ、1行目戻してないです。
usestrictでエラー追いやすいように一つにまとめました。

**766** · 2005/10/17(月) 05:53:08

>>16

！！！！

でけてるー！！！　感謝です！

こんな朝方まで付き合ってくださって本当にありがとうございます。大泣
ソースみたらやっぱり全然違いますた。。

これは質問をquestion_1.tsvから読み込まなくても、index.html →　post でquestion.cgiでももしかしていけますか？

16 · 2005/10/17(月) 05:57:15

質問を表示したソースをHTMLとして保存すれば出来ます。
perlの中の変数はかなり弄ったけど、フォームの部分は触ってません。

**766** · 2005/10/17(月) 06:04:44

>>16

わかりましたです！やってみますです。
本当に有難うございます。

あと名前をcsvに書き出したいんですが、$in{name}で書き出せるのでしょうか？（配列は自力でやりますです。）

あとその名前が入っていなかったら、エラーにしたいんですが、さっき入れた if ($in{name} eq '') { &error('名前を入力してください',''); } じゃだめでしょうか？

これで最後の質問です。。ご指導おねがいできませんでしょうか？

**766** · 2005/10/17(月) 06:16:25

>>16

すませんです。。せっかく作っていただいたのですが、

１人目の名前: name１
その人の1～3問目の回答番号: hoge1, hoge2, hoge3,
1～3問目の正解番号: anser1,anser2,anser3

2人目の名前: name2
・
とすると

name１、hoge1, hoge2, hoge3,(改行)
”空欄”,anser1,anser2,anser3(改行)
name2、hoge1, hoge2, hoge3,(改行)
”空欄”,anser1,anser2,anser3(改行)
・
になってませんでした。。。泣

hoge1,anser1(改行)
hoge2,anser2(改行)
・

になってました。。もう一度みてもらえませんでしょうか、、再度大泣