Perlについての質問箱 30箱目at TECHPerlについての質問箱 30箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト738:デフォルトの名無しさん 07/05/22 21:49:02 -P オプション で使えるCのプリプロセッサですが 起動が多少遅くなるので 別な方法がないか教えてもらえませんか 使用用途としては 下記のようなものです 単にifで分けると モジュール部もすべて読み込むようなので 両方ともないとエラーになりました evalで囲めばそれっぽくうごきますが しっくりきません。 #ifdef HOGEHOGE use HOGEHOGE; ～～～ #else use HOGEHOGE2; ～～～ #endif 739:デフォルトの名無しさん 07/05/22 22:51:27 >>738 UNIVERSAL::require 使えば解決するようなコトじゃないかな？ 740:デフォルトの名無しさん 07/05/22 22:52:13 質問では、条件で分けたいのはuseだけじゃないっぽいけど: use $ENV{'HOGEHOGE'}; とかして環境変数HOGEHOGEから渡せないかなと思ったがダメだった。 741:738 07/05/22 22:58:53 >>739-740 趣旨的には 740のとおり useだけじゃなくて 汎用的に使える方法がないかと（まぁ -Pで出来るんですがあんまり標準的じゃないような気がして） 目的としては、環境がある程度違っても ソースを複数管理するのは面倒なので同一ソースで動かしたいです 下記のようなのも出来ると非常に助かります #ifdef hogehoge while(1) { #endif ～～～～～ #ifdef hogehoge } #endif 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch