"foo" =~ /foo/; print grep //, qw( bar foobar ); # foobar