Select Code to Download

foreach ($doc->findnodes('/library/cd/artist/text()'){
   my $artist = $_->data;
   if ($artist){
...
      print "0 | ";
   }
}

foreach ($doc->findnodes('/library/cd/artist')){   #update: added ')'
   my $artist = $_->to_literal;
   if ($artist){
...
      # you can use $_->appendTextNode('text to add') here
   }
}