Using the same sample data as Athanasius and XML::XSH2, a wrapper around XML::LibXML:

open file.xml ;
for /data/class[@id]/* set @class ../@id ;
ls /data/class/* | cat > file2 ;
[download]