my %file1;
tie %file1, "DB_File", "file1.data" ;