<div dir="ltr">.<div style="font-family:verdana,sans-serif;display:inline" class="gmail_default">.. and in case anyone was curious the equivelent and much better looking code to the RT::Client::REST snippet I provided earlier is:</div>

<div><div style="font-family:verdana,sans-serif;display:inline" class="gmail_default">
<br></div></div><div><div><font face="courier new, monospace">my $ips = $self->TicketObj->CustomFieldValues( 'IP' );</font></div><div><font face="courier new, monospace">while ( my $ipobj = $ips->Next ) {</font></div>

<div><font face="courier new, monospace">  my $ip = $ipobj->Content;</font></div><div><span style="font-family:'courier new',monospace">  my $tsql = qq/Queue = 'Incidents' AND Status = 'open' AND CF.{IP} = '$ip'/;</span><br>

</div><div><font face="courier new, monospace">  my $tickets = RT::Tickets->new(RT->SystemUser);</font></div><div><font face="courier new, monospace">  $tickets->FromSQL($tsql);</font></div><div><font face="courier new, monospace">  while (my $t = $tickets->Next) {</font></div>

<div><span style="font-family:'courier new',monospace">    $self->TicketObj->AddLink( Type=>'MemberOf', Target=> $t->id );</span><br></div><div><font face="courier new, monospace">  }</font></div>

<div><font face="courier new, monospace">}</font></div></div></div>