use warnings; use iVPU_Parameter; $vlan_id=xxx; open(FH_CURRENT,"Running.txt"); open(FH_STANDARD,"Standard.txt"); @iVPU_current=; @iVPU_standard=; &Configchk($vlan_id,@arr_iVPU_standard,@arr_iVPU_current);