Help for this page

Select Code to Download

Select or download this

use Modern::Perl;

while (<DATA>) {
...

THIS IS NOT A HEX DUMP

Select or download this

==00
==00
==0F
...
All zeroes or empty, Check output!
All zeroes or empty, Check output!
Not a valid file, Check output!