restructure perl module