You probably want

print $xmlfile ' ' x 8, "<spirit:library>$proj_name\_lib</spirit:libra
+ry>\n";
[download]

If not, please be more specific.