$id =~ s/\s+$//g;
    $id =~ s/^\s+//g;

##</code><code>##

    elsif($id =~ /^.*\@\w+\.com|org|net/)

##</code><code>##

    elsif($id =~ /^.*\@\w+\.(?:com|org|net)/)