$tag =  lc $tag;
$tag =~ s/[^az09 _\-\+\.]//g;