| version 1.6 | | version 1.7 |
|---|
| | |
| $fh = $ESRV[$count]; | | $fh = $ESRV[$count]; |
| open($fh, ">crossfire.$count") || | | open($fh, ">crossfire.$count") || |
| die("Can't open crossfire.$count for write: $!\n"); | | die("Can't open crossfire.$count for write: $!\n"); |
| | | binmode( $fh ); |
| } | | } |
| | | |
| open(BMAPS,"bmaps.paths") || die("Can't open bmaps.paths: $!\n"); | | open(BMAPS,"bmaps.paths") || die("Can't open bmaps.paths: $!\n"); |
| | |
| | | |
| $length = -s "$filename"; | | $length = -s "$filename"; |
| if (open(FILE,"$filename")) { | | if (open(FILE,"$filename")) { |
| | | binmode( FILE ); |
| print $fh "IMAGE $num $length $file.$file1\n"; | | print $fh "IMAGE $num $length $file.$file1\n"; |
| print "Error reading file $filename" if (!read(FILE, $buf, $length)); | | print "Error reading file $filename" if (!read(FILE, $buf, $length)); |
| $position = tell $fh; | | $position = tell $fh; |