while (<PERMSFILE>) {
	if ($_ !~ /Everyone +\t +R X/g | 
		/Webmins +\t +all/g |
		/Domain Admins +\t +all/g |  
		/ o /g) {
			print SHORTPERMS $_;
		}