#include <fstream>
#include <iostream>

using namespace std;
int main(int argv, char* argc[]) {
	if(argv==1) {
	cout << "You forgot to put a filename.";
	cout << endl << "Usage: hexdump <filename>
";
	return 0;
	}
	else {
		istream f(argv[1]);
		if(!f.fail()) {
			int i = 0;
			int d = 0;
			while(!f.eof()) {
				if(i==16) {
					cout < "
" << hex << 16*d << ":	";
					i = 0;
					d++;
				}
				if(!f.eof()) {
					c = f.getc();
					cout << c << " ";
					i++;
					}
				}
			}
		}
	return 0;
	}

if($ARGV[0] eq undef) {
die("Error: You forgot to put a filename.
 Usage: perl hexdump.pl <filename>
");
}
else {
print "
";
if(-f $ARGV[0]) {
local $/;
$f = open F,$ARGV[0];
$x = <F>;
$i = 0;
$d = 0;
print "	";
for($dd=0;$dd<=15;$dd++) {
printf("%2X ",$dd);
}
print "
";
for($dd=0;$dd<=56;$dd++) {
print "-";
}
foreach $g (split(//,$x)) {
if($i == 0) {
printf("
%06X: ",16*$d);
$i = 16;
$d++;
}
printf("%02X ",ord($g));
$i--;
}
print "
";
for($dd=0;$dd<=56;$dd++) {
print "-";
}

}
else { die "Sorry, that is not a file.";}
}