Help for this page

Select Code to Download

Select or download this

if (($aliasmailbox !~ /\@/) or ($aliasmailbox !~ /\./)) { 
&TaskLog("IMSModifyDetails sub::User's input not sufficient---a\n");
...
print $query->redirect("/cgi-bin/DisplayModifyDetails.cgi?ErrorMsg2=IN
+PUT3");
exit; }                
***

Select or download this
```
if ($aliasmailbox !~ /^.\@$@\.$/)
```