file2c

--=__Part12324DC8.0__=
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

Welcome back, ppt!

I figure why not go for the low-hanging fruit, so here's file2c. Let me
know about desired changes & stuff. The 'shift||""' is ugly, but I
wanted to run under -w.

Without a UNIX box handy, I don't know if it's supposed to print a \n
at the end or not.  I also have no idea if it's doing the right thing
for the wide hex char in there: I just stole it from the perlop man
page.

It would probably be generous to call this a test suite, but:

>perl -e "print qq{\t\n\0\cx\x{263a}x~}" | perl file2c.pl
9,10,0,24,226,152,186,120,126
>perl -e "print qq{ab}" | perl file2c.pl a b
a97,98b
>perl -e "print qq{ab}" | perl file2c.pl a
a97,98
>perl -e "print qq{ab}" | perl file2c.pl "" b
97,98b  
>perl -e "print qq{}" | perl file2c.pl a b
ab
-Amir Karger

ps I'm soon going to post to CPAN an alpha Z-machine translator, which
could get 'advent' done, too - although it depends on which port of
Advent you want.

--=__Part12324DC8.0__=
Content-Type: application/octet-stream; name="file2c"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="file2c"

IyFwZXJsIC13DQoNCmxvY2FsICQvOyB1bmRlZiAkLzsgDQpwcmludCAoKHNoaWZ0fHwiIiksIGpv
aW4oIiwiLCBtYXAge29yZH0gc3BsaXQgLy8sIDxTVERJTj4pLCAoc2hpZnR8fCIiKSk7DQoNCg0K
PWhlYWQxIE5BTUUNCg0KZmlsZTJjIC0gY29udmVydCBmaWxlIHRvIGMtc291cmNlDQoNCj1oZWFk
MSBTWU5PUFNJUw0KDQogICAgIGZpbGUyYyBbc3RyaW5nXSBbc3RyaW5nXQ0KDQo9aGVhZDEgREVT
Q1JJUFRJT04NCg0KVGhpcyBwb3J0IGlzIHBhcnQgb2YgdGhlIFBlcmwgUG93ZXIgVG9vbHMgcHJv
amVjdC4gSSd2ZSBjb3BpZWQgdGhlDQpkb2NzIGRpcmVjdGx5IGZyb20gdGhlIEJTRCBtYW4gcGFn
ZS4NCg0KVGhlIGZpbGUyYyB1dGlsaXR5IHJlYWRzIGEgZmlsZSBmcm9tIHRoZSBzdGFuZGFyZCBp
bnB1dCBhbmQgd3JpdGVzIGl0IHRvDQp0aGUgc3RhbmRhcmQgb3V0cHV0LCBjb252ZXJ0aW5nIGVh
Y2ggYnl0ZSB0byBpdHMgZGVjaW1hbCByZXByZXNlbnRhdGlvbg0Kb24gdGhlIGZseS4NCg0KSWYg
dGhlIGZpcnN0IHN0cmluZyBpcyBwcmVzZW50LCBpdCBpcyBwcmludGVkIGJlZm9yZSB0aGUgZGF0
YS4gIElmIHRoZQ0Kc2Vjb25kIHN0cmluZyBpcyBwcmVzZW50LCBpdCBpcyBwcmludGVkIGFmdGVy
IHRoZSBkYXRhLg0KDQpUaGlzIHByb2dyYW0gaXMgdXNlZCB0byBlbWJlZCBiaW5hcnkgb3Igb3Ro
ZXIgZmlsZXMgaW50byBDIHNvdXJjZSBmaWxlcywNCmZvciBpbnN0YW5jZSBhcyBhIGNoYXJbXS4N
Cg0KPWhlYWQxIEFVVEhPUg0KDQpBbWlyIEthcmdlciA8YWthcmdlckBjcGFuLm9yZz4NCg0KPWhl
YWQxIExJQ0VOU0UNCg0KVGhpcyBwcm9ncmFtIGlzIGNvcHlyaWdodCAoYykgQW1pciBLYXJnZXIg
MjAwNC4NCg0KVGhpcyBwcm9ncmFtIGlzIGZyZWUgYW5kIG9wZW4gc29mdHdhcmUuIFlvdSBtYXkg
dXNlLCBtb2RpZnksIGRpc3RyaWJ1dGUsIGFuZA0Kc2VsbCB0aGlzIHByb2dyYW0gKGFuZCBhbnkg
bW9kaWZpZWQgdmFyaWFudHMpIGluIGFueSB3YXkgeW91IHdpc2gsIHByb3ZpZGVkIHlvdQ0KZG8g
bm90IHJlc3RyaWN0IG90aGVycyBmcm9tIGRvaW5nIHRoZSBzYW1lLg0KDQo9aGVhZDEgU0VFIEFM
U08NCg0KUGVybCBQb3dlciBUb29scyBwcm9qZWN0LCBodHRwOi8vcHB0LnBlcmwub3JnDQo9Y3V0
DQo=

--=__Part12324DC8.0__=--