my $tempport = $args{DOUBLE_BYTE} =~ /y/i ? DB_CATPORT : SB_CATPORT ;