@ports=qw(portname portID port802); @val1= qw(ON ON OFF); @val2=qw(EX EX NEX);