while ( $line = <STDIN> ) 
{ 
print OUT $line; 
chop $line; 
( $name, $value ) = split(/=/,$line,2); 
if ( $name eq "userid" ) 
{ 
$userid = $value; 
next; 
} 
if ( $name eq "password" ) 
{ 
$password = $value; 
next; 
} 
if ( $name eq "originAddress" ) 
{ 
$originIPAddress = $value; 
next; 
} 
if ( $name eq "originPort" ) 
{ 
$originPort = $value; 
next; 
} 
if ( $name eq "targetAddress" ) 
{ 
$targetAddress = $value; 
next; 
} 
if ( $name eq "targetPort" ) 
{ 
$targetPort = $value; 
next; 
} 
# ignore unrecognized things -- don't break on future capabilities 
}