Sign in
ara-mdk
/
kernel
/
panda
/
33cd941e35dc46dc12fc12ed4a91c47c4fed8858
/
.
/
arch
/
m68k
/
platform
/
68328
/
bootlogo.pl
blob: b04ae3f50da52a1827648c17b0dd24151bd89034 [
file
] [
log
] [
blame
]
$_
=
join
(
""
,
<>);
s
/(
0x
[
0
-
9a
-
f
]{
2
})/
sprintf
(
"0x%.2x"
,
ord
(
pack
(
"b8"
,
unpack
(
"B8"
,
chr
(
hex
(
$1
))))))/
gei
;
s
/^
/ .byte /
gm
;
s
/[,};]+
$
/
/gm;
s/
^
static
.*//
gm
;
print
$_
;