|
Brought to you by:
Suppliers of:
|
|
|
| |
Credit:
The information has been provided by Reed Arvin.
To keep updated with the tool visit the project's homepage at: http://reedarvin.thearvins.com/tools.html
|
| |
DumpHex is a tool that converts any binary file into an hex dump and save it into a file.
#
# DumpHex v1.0 | Reed Arvin reedarvin[at]gmail[dot]com
#
# Usage:
# DumpHex.pl <file name>
# DumpHex.pl MyBin.exe
#
############################
use strict;
my($strInputFile) = $ARGV[0];
my($intByteCount) = "";
my($binBytes) = "";
my($intReadLength) = "";
if ($#ARGV ne "0")
{
print "DumpHex v1.0 | Reed Arvin reedarvin[at]gmail[dot]com\n";
print "\n";
print "Usage:\n";
print "DumpHex.pl <file name>\n";
print "DumpHex.pl MyBin.exe\n";
exit;
}
$intReadLength = 16;
if (open(INPUTFILE, "< $strInputFile"))
{
open(OUTPUTFILE, "> $strInputFile.txt");
binmode(INPUTFILE);
$intByteCount = 0;
while (read(INPUTFILE, $binBytes, $intReadLength))
{
print (OUTPUTFILE uc(unpack("H" . ($intReadLength * 2), $binBytes)), "\n");
}
close(INPUTFILE);
close(OUTPUTFILE);
}
else
{
print "ERROR! Cannot open file $strInputFile";
}
# Written by Reed Arvin reedarvin[at]gmail[dot]com
|
|
blog comments powered by
|
|
|
