Add tool to create a DOS-formatted hard drive image; minor tidying of the

MBR code.

1 files changed, 16 insertions, 0 deletions

diff --git a/bin2hex.pl b/bin2hex.pl
new file mode 100755
index 00000000..8d8909b9
--- /dev/null
+++ b/bin2hex.pl
@@ -0,0 +1,16 @@
+#!/usr/bin/perl
+$len = 0;
+while ( read(STDIN,$ch,1) ) {
+    $cc = ord($ch);
+    $len += printf ("%x", $cc);
+    if ( $len > 72 ) {
+	print "\n";
+	$len = 0;
+    } else {
+	print " ";
+	$len++;
+    }
+}
+print "\n" if ( $len );
+exit 0;
+