Help for this page
[~] $ perl -Mre=debug -we'$_ = "abbaba"; /(.).*?\1/' Freeing REx: `,' Compiling REx `(.).*?\1' ... 4 <abba> <ba> | 11: END Match successful! Freeing REx: `(.).*?\1'