rm Pembedtest.c
./xsubpp -typemap /mit/perl5/arch/share/perl5.002/ExtUtils/typemap Pembedtest.xs  > Pembedtest.c
gcc pembed.c -I/mit/perl5/lib/perl5.002/CORE/ -c
gcc Pembedtest.c -I/mit/perl5/lib/perl5.002/CORE/ -c
gcc -L/mit/perl5/lib/perl5.002/CORE/ pembed.o Pembedtest.o -o mynperl -lsocket -lperl -lnsl -lm