Select Code to Download

Select or download this

use strict;
use warnings;
...
   printf("%08X: %-35s %s\n", $offset, $bytes, $chars);
   $offset += 16;
}

Select or download this

00000000: 75736520 73747269 63743B0D 0A757365 use strict;..use
00000010: 20776172 6E696E67 733B0D0A 0D0A6C6F  warnings;....lo
...
00000140: 7465732C 20246368 61727329 3B0D0A0D tes, $chars);...
00000150: 0A202020 246F6666 73657420 2B3D2031 .   $offset += 1
00000160: 363B0D0A 7D0D0A                     6;..}..