# Instead of having for my $iter, for uses $_ as the iterator below:
for ("Up and under", "Best winkles in Sunderland") {
    if (/under/) {
        print "We're talking about rugby\n";
    }
}