73 open(my $fh4,'>',$branchfile) or die "Couldnt Open file ";
 74 close ($fh4);