in reply to Re: Speaking between Perl and C in thread Speaking between Perl and C
Two comments:
- Somebody other than me probably read that comment and immediately wanted to see the Tiny Web Server, so there's a link. And here's the actual code (notice 11-sh unnecessary spaces, so it's actually designed to be readable):
perl -MIO::All -e 'io(":8080")->fork->accept->(sub { $_[0] < io(-x $1
+? "./$1 |" : $1) if /^GET \/(.*) / })'
- The Perl Advent Calendar has another discussion of YAML (using a different library --- perhaps slower than Syck, however?).
|