On Tue, May 16, 2006 at 11:06:02AM -0700, Wagner, David --- Senior Programmer 
Analyst --- WGO wrote:

>       while ( @mir ) {
>          $hash{shift(@mir)} = shift(@mir2);
>       }

  @[EMAIL PROTECTED] = @mir2;

-- 
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to