This worked for me:

  print $_->getName."\n" for
    $xp->findnodes('//*[not(child::*) and not(attribute::*) and not(st
+ring(.))]');
[download]

-David