Perlについての質問箱 9箱目
■ このスレッドは過去ログ倉庫に格納されています
0099デフォルトの名無しさん
NGNGそのシステムでsymlinkをサポートしていれば真、なければ偽が返る。
symlinkをサポートしていないシステムでsymlinkを実行すると致命的
エラーになるので、evalしたあとに$@を見ることでそれをつかまえようと
しているわけだ。
symlinkの引数が空文字列なのは、わざと失敗させることでゴミが残らない
ようにしてるんだろうな。
perldoc -f symlinkには $symlink_exists = eval { symlink("",""); 1 }; という
同じような例がある。
■ このスレッドは過去ログ倉庫に格納されています