Perlについての質問箱 50箱目
■ このスレッドは過去ログ倉庫に格納されています
0082デフォルトの名無しさん
2012/01/23(月) 17:51:18.91このようにファイルを開けなかった場合はデフォルト値にしたい場合
例外処理するとopenでプログラムが終了されて、デフォルト値にすることができないのでこのようにするしかないんですが
@default_hobby_list=("ゲーム","アニメ","PC");
open(IN,"hobby.dat");
@hobby_list = <IN>;
close(IN);
#@hobby_listが取得できなかった場合
if(@hobby_list==0){
@hobby_list = @default_hobby_list;
}
■ このスレッドは過去ログ倉庫に格納されています