If you edit your node and put <CODE> ... </CODE> tags around the code then it will be far more legible and your <FILE1> and <FILE> expressions won't be interpeted as HTML tags.

At the same time, you should probably consider checking the return value from the open function. I realise that this is just an example, but people will copy and paste it, so you should make it as safe as possible.

--
<http://www.dave.org.uk>

European Perl Conference - Sept 22/24 2000, ICA, London
<http://www.yapc.org/Europe/>