perl module init