Perlについての質問箱 41箱目at TECHPerlについての質問箱 41箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト550: ◆TWARamEjuA 09/09/23 01:28:09 1200件もhitするのか。。。 ひとまずRock54してくるです。。。 551:デフォルトの名無しさん 09/09/23 07:56:28 コードゴルフ用の問題みたいだね 552:デフォルトの名無しさん 09/09/23 13:49:46 >>541 もし毎回同じパラメータ渡してるなら、サブルーチンの受け取るパラメータを直す。 それが難しければ、ラッパーをかます。 ベタウチはバグの元。 プログラム書法にも書かれてる。 「汚れ仕事は機械にやらせよう」 ただし、同書は冒頭で戒めてるので注意。 「わかりやすく書こう。うますぎるプログラムはいけない」 根拠は可読性とメンテナンス性。 553:デフォルトの名無しさん 09/09/23 17:32:22 こっち↓ my $data = do{local $/; <$fh>}; と、こっち↓ read $fh, my $data, -s $fh; では、どちらを使うのがいいのでしょうか？ 554:デフォルトの名無しさん 09/09/23 17:48:49 >>553 どっちもだめ。 【理由】意図不明 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch