in reply to count repeatation

hi, This regular expression will work fine. 
$string ='ab23cdefgXX(3A5)XXhijkl23mnXX(3)XXopq432rsXX(450b)XXtuv';
@length= $string =~ m/XX/g;
print scalar @length;

[download]

In Section Seekers of Perl Wisdom