File: chex.pl

package info (click to toggle)

tora 1.3.16-1

links: PTS
area: main
in suites: sarge
size: 11,604 kB
ctags: 10,426
sloc: cpp: 100,338; sh: 5,034; perl: 1,482; makefile: 566; xml: 69

file content (11 lines) | stat: -rw-r--r-- 185 bytes

parent folder | download | duplicates (2)

#!/usr/local/bin/perl

undef $/;

$_=<>;

s/(.)/"\\x".sprintf("%02x",unpack("C",$1))/ges;
s/(.{1,160})/\"$1\"\n/gs;

print "static const unsigned char tora_toad[] =\n";
print $_.";\n";