<html><div style='background-color:'><DIV class=RTE>
<P>Hi,</P><FONT face=Helv size=2>
<P>I'm looking at some perl scripts (not yours) and come across something I don't understand. The code is below</P>
<P>&nbsp;</P><B>
<P>my (%trailsByChannel);</P>
<P>my($channelX,$pathtype,$cctName);</P>
<P>$trailsByChannel{join '|',($channelX,$pathtype)}-&gt;{$cctName} = 1;</P></B>
<P>The problem I have is that I dont understand what the <B>$trailsByChannel{join '|',($channelX,$pathtype)}-&gt;{$cctName} = 1;</B> is doing.</P>
<P>Anybody have any ideas&nbsp;have any ideas ?</P>
<P></FONT>Thanks</P>
<P>Phil<BR><BR></P></DIV>
<DIV></DIV>
<BLOCKQUOTE style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #a0c6e5 2px solid; MARGIN-RIGHT: 0px"><FONT style="FONT-SIZE: 11px; FONT-FAMILY: tahoma,sans-serif"></FONT></BLOCKQUOTE></div></html>