don't have a solution for you, but i do have a suggestion.
replace

open( OUTFILE, ">>$filename" ) or die ( "no go miss ");

with


open( OUTFILE, ">>$filename" ) or die ( "no go miss: $!");
[download]

That way you can get an error messager that might help you track down the problem.

Thought that comes to mind. how does perl deal with appending to a file that doesn't exist? I'd have thought it just created it, but I'm not sure.