perl詳しい人いませんか(;´Д`)useをrequireに置き換えたいんですけど