phpでperlでいうuse strict;みたいなことは出来るんでしょうか?