(@extensions) = $largeStr =~ /Tel:\s(06\d)/g;