- 1 名前:デフォルトの名無しさん mailto:sage [2007/03/14(水) 22:54:12 ]
- "The duct tape of the Internet" こと、Perlについての質問箱です。
"There's more than one way to do it" ということで、Perlの奥深さについて皆で語り合い、追求してまいりましょう。 CGIについての質問は板違いです。WEBプログラミング板でどうぞ。 CGIとPerlの区別がつかない人もWEBプログラミング板に行ってください。 (WEBプログラミング板 pc8.2ch.net/php/ ) CGIの質問は答えがPerlと全然関係ない話に帰着する場合が多かったりするのでWEBプログラミング板に行って聞いたほうが得ですよ。 このスレでは(CGI以外の)純粋にPerlのみに関係する質問を取り扱っていこうと思います。 スレ違いの質問にはスルーか、速やかな誘導をお願いします。 www.perl.org/get.html ● 2006/12/21現在の最新版: 5.8.8 ● 2006/12/21現在の開発版: 5.9.3 前スレ Perlについての質問箱 29箱目 pc11.2ch.net/test/read.cgi/tech/1166708139/ リンク集は>>2-3 過去スレは>>4
- 786 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 01:59:16 ]
- <>をファイル読み込みとして認識させるには、
括弧の中を $fh のような形をしたスカラ変数にしないとダメだから、 一時的に変数を作るしかないね。 my @data = sub{$_=shift;<$_>}->($this->{fh_lex}); とかw
- 787 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 02:08:24 ]
- ヒント:<()>
- 788 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 02:09:52 ]
- <()> はファイルグロブ。
- 789 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 02:22:28 ]
- <${this->{fh_lex}}>
とかダメ? 試してないけど。
- 790 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 02:31:13 ]
- >>789
ダメだよ。やってみたw <>を放棄した技だけどw my @data = readline $$this{fh_lex} ;
- 791 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 02:37:14 ]
- 普通に<>の内部関数のreadline使って、
my @data = readline $this->{fh_lex}; でよかろ。
- 792 名前:デフォルトの名無しさん mailto:sage [2007/05/25(金) 04:08:38 ]
- >>785
別に無理に1行に書かなくても地味に$fhに代入した方がよっぽど明示的で よいコードに見える。 どうしてもっていうんなら、$thisがオブジェクトならオーバーロードを使ってみては?
|

|