<b_jonas> slashlearn adpoted/"Oh lord, we\'ve adpoted another one." (about Emily) => Marten realizes what kind of webcomic he lives in in http://questionablecontent.net/view.php?comic=2298

#!/usr/bin/perl -CSDA
$_ = (join " ", @ARGV) || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouyAEIOUY]/) { s/^[^aeiouyAEIOUY]*/Th/; } else { s/^./T/; } print "$_.";