my @extensions = $large_string =~ /Tel: 06(\d+)/g;

my %extension;
$extension{$_}++ for @extensions;