I have a method here that should work for you. The first thing we'll do is create a subroutine that checks for existance of an item in an array. Then we'll loop over every element in Array1 and check for it's existance in Array2. The code looks like:

sub in_array{
    my $value = shift;
    my @array = @_;
    foreach $item (@array){
    if($value eq $item){
        return 1;
    }
    }

    return 0;
}


@array1 = ("q", "w", "e", "r", "t","z");
@array2 = ("q", "w", "e", "r", "t","y");

foreach $value (@array1){
    if(!in_array($value,@array2)){
    print "Value $value does not match any value in \@array2\n";
    }
}
[download]

This should output exactly what you want. Enjoy.