Re: HOw do I compare two strings against to arrays respectively

in reply to How do I compare two strings against two arrays respectively?

How about something like:

sub DoubleMatch
{
  my( $item1, $item2, $array_ref1, $array_ref2 ) = @_;
  for( @$array_ref1 )
  {
    if( $_ eq $item1 )
    {
      for my $item ( @$array_ref2 )
      {
        return 1 if $item eq $item2
      }
    }
    return 0;
  }
}

# Then you can say:
if( DoubleMatch( $item1, $item2, \@array1, \@array2 )
{
  # do stuff
}
[download]

Not that I've tested that or anything.

Comment on Re: HOw do I compare two strings against to arrays respectively Download Code

In Section Seekers of Perl Wisdom