if (/Grapes/ || /strawberry/i) {
    print;
}
else {
    print "$_ is not in the list.\n";
}