"1" =~ /1/;
print @->1?"yes\n":"no\n";
"1" =~ /(1)/;
print @->1?"yes\n":"no\n";
__END__
no
yes