perl -nE"say join',',map{ qq[c($_)] } unpack 'C*', $_" ..\dumpbin.exe
c(77),c(90),c(144),c(0),c(3),c(0),c(0),c(0),c(4),c(0),c(0),c(0),c(255),c(255)
c(36),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(204),c(80),c(224),c(67),c(136),c(4
c(0),c(0),c(0),c(6),c(0),c(0),c(0),c(0),c(0),c(0),c(176),c(19),c(0),c(0),c(0),
),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(
c(0),c(0),c(0),c(4),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0
(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0)
(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),c(0),
c(0),c(0),c(126),c(24),c(0),c(0),c(146),c(24),c(0),c(0),c(162),c(24),c(0),c(
c(0),c(0),c(0),c(108),c(105),c(110),c(107),c(46),c(101),c(120),c(101),c(0),c
c(0),c(108),c(105),c(110),c(107),c(0),c(0),c(0),c(0),c(46),c(101),c(120),c(1
,,,