my %sysuser = map { $_ => 1 } qw(administrator accounts support postmaster webmaster spam-admin  technical billing sales purchase buy misuse assistance mail virus-admin manager usenet hostmaster);

if (defined $sysuser{$username}) {