package iVPU_Parameter; require Exporter; @ISA=qw(Exporter); @EXPORT = qw(Configchk); sub Configchk() { &a=$_[0]; @arr_iVPU_standard=$_[1]; @arr_iVPU_current=$_[2]; blah blah blah }