12/01/2007 23:54:52;S;353958.admin2;user= ....
12/14/2007 23:54:52;S;354218.admin2;user= ....

##</code><code>##

for ( 1...31) {
    open(FH$_, ">200712$_"), or die "Could not open $date $!\n";
}