$Text =~ m/Hello(one|two|three| )*World/ig;