Help for this page
my $outfile = "$HF_DIR/binary_copy.dat"; ... close (DATA) or die "Not able to close the file: DATA \n"; close (OUTFILE) or die "Not able to close the file: $outfile \n";
__DATA__ ..binary data....SUB character......binary data... ......