Help for this page
// see perldoc perlembed (http://www.perldoc.com/perl5.8.0/pod/perlemb +ed.html) #include <EXTERN.h> ... pthread_kill(tid, SIGINT); pthread_join(tid, NULL); }
creating new thread... thread 1... ... thread 4... thread 5... interrupted at fake.pl line 1.
$"=$,,$_=q>|\p4<6 8p<M/_|<('=> .q>.<4-KI<l|2$<6%s!<qn#F<>;$, .=pack'N*',"@{[unpack'C*',$_] }"for split/</;$_=$,,y[A-Z a-z] {}cd;print lc