my %hash;

hash{$_}++ foreach ($largeStr =~ /Tel: (06\d+)/g);