open (USRFILE,">>$svb::htmlsystempath/people.dat")||cmn::dienice("$lang::write_file_error ./people.dat:  $!!");
	print USRFILE "$email=$name\n";
	close USRFILE;