Also, (I don't think this has been mentioned yet) line 203 is most likely generating the taint error because $file is tainted (i.e. it's value was obtained from outside the program). For methodologies on untainting data, I'd recommend man perlsec.