You do know that /o tells perl that any $scalar_var in the regex will never change its value so only compile the regex once don't you? If so why use it whan all you have is literals in your example?

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print