Whenever I seem to have this "search backwards" urge (not very often,
I admit), I without much thought just throw memory at it with 

    reverse($str) =~ /pat/

Or, if that's not the "search backwards" sense intended, then maybe
I'll throw time at it:

    $str =~ /.*pat/

Sometimes I've also done

    ($str . $str) =~ /pat/

to effect a search that wraps around--kinda.

--tom

Reply via email to