>>653
なにかコードがPerlとは違うように見えるのですが。
省略か何かの書き方の違いですか?

それとどこかで拾ってきたサンプルソースがdefinedではなく!definedなってて
それでバグったみたいです!definedは単なるミス表記なのか何か意味があるのか教えてください。