Select Code to Download

if ( scalar (grep { $_ eq $item3 } @list) == scalar @list) {
    print "All are equal.\n";
}

if (grep { $_ eq $item3 } @list == @list) {
    print "All are equal.\n";
}

if (grep $_ neq $item3, $item1, $item2) {
    print "All are equal.\n";
}