open (DATABASE,">$database");
@DB=<DATABASE>;