Can someone please point me to good XS documentation!

A poor man begs,
A troubled man prays,
who shall answer?




This is the first time perldoc has disappointed me. The example on perlxs is wrong and fails. I do not wish to flame writers of perlxs but please check that your examples work! Ironically I know that broken tutorials is a problem with SDL perl too.

If anyone can point me to the simplest working exaple of XS with a c struct, it would be greatly appreciated.