Help for this page
use strict; use warnings; ... __DATA__ (a|b){2} bbab
22:21 >perl 1345_SoPW.pl Useless use of greediness modifier '+' in regex; marked by <-- HERE in + m/\A ((a|b){2}){1}+ <-- HERE \z/ at 1345_SoPW.pl line 27, <DATA> li +ne 2. ... SUCCESS 22:21 >