Select Code to Download

perl -e '$_="aaaa"; print "Match: $1\n" if /(?:(a)\1)/;'

perl -e '$_="aaaa"; print "Match: $1\n" if /((?:a)\1)/;'