Não posso levar o crédito por isso; apenas pensei que era muito doce.
:;while [ $? -eq 0 ];do nc -vlp 8080 -c'(r=read;e=echo;$r a b c;z=$r;while [ ${#z} -gt 2 ];do $r z;done;f=`$e $b|sed 's/[^a-z0-9_.-]//gi'`;h="HTTP/1.0";o="$h 200 OKrn";c="Content";if [ -z $f ];then($e $o;ls|(while $r n;do if [ -f "$n" ]; then $e "<a href="/$n"">`ls -gh $n`</a><br>"";fi;done););elif [ -f $f ];then $e ""$o$c-Type: `file -ib $f`n$c-Length: `stat -c%s $f`"";$e;cat $f;else $e -e ""$h 404 Not Foundnn404n"";fi)';done“