Perlについての質問箱 30箱目at TECHPerlについての質問箱 30箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト786:デフォルトの名無しさん 07/05/25 01:59:16 <>をファイル読み込みとして認識させるには、 括弧の中を $fh のような形をしたスカラ変数にしないとダメだから、 一時的に変数を作るしかないね。 my @data = sub{$_=shift;<$_>}->($this->{fh_lex}); とかｗ 787:デフォルトの名無しさん 07/05/25 02:08:24 ヒント：<()> 788:デフォルトの名無しさん 07/05/25 02:09:52 <()> はファイルグロブ。 789:デフォルトの名無しさん 07/05/25 02:22:28 <${this->{fh_lex}}> とかダメ？ 試してないけど。 790:デフォルトの名無しさん 07/05/25 02:31:13 >>789 ダメだよ。やってみたw <>を放棄した技だけどw my @data = readline $$this{fh_lex} ; 791:デフォルトの名無しさん 07/05/25 02:37:14 普通に<>の内部関数のreadline使って、 my @data = readline $this->{fh_lex}; でよかろ。 792:デフォルトの名無しさん 07/05/25 04:08:38 >>785 別に無理に1行に書かなくても地味に$fhに代入した方がよっぽど明示的で よいコードに見える。 どうしてもっていうんなら、$thisがオブジェクトならオーバーロードを使ってみては？ 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch