in reply to printing the current script will not show

This works fine for me, also. Is there any chance that you have reduced this to a minimal test case and are actually viewing the results in a browser? If so, any data in the form /<[^>]*>/ (more or less) will be interpreted as a tag by the browser and will be ignored if it doesn't understand it.

Cheers,
Ovid

Vote for paco!

Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.