Re: Search in array from match in another array, print once only.

[tmharish]

Change loop to:

foreach $string(@array) {
    
    my $found = 0 ;
    foreach $string2(@original) {
    if ($string eq $string2) {
        $found = 1;
    }
    }

    if ($found == 0) {
    print "$string not found\n";
    }
    else
    {
    
    print "$string found\n";
    
    }
    
}

Also use strict and warnings ...

[tmharish]

More importantly its more efficient if you use a hash:

use strict   ;
use warnings ;

my @array    = ( "54321", "54312", "5999", "54352", "12345" ) ;
my @original = ( "12345" , "54321" , "12355"                ) ;

my %hash  = map( { ( $_ => 1 ) } @original ) ;
print "". ( ( $hash{ $_ } ) ? "$_ Found\n" : "$_ Not Found\n" ) foreac
+h ( @array ) ;