if ($entry !~ /^([a-zA-Z0-9@_.]*)$/) {