bootlogo.pl

来自「Linux Kernel 2.6.9 for OMAP1710」· PL 代码 · 共 11 行

$_ = 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 $_;