Thanks. This is what i really wanted :)

There is a small typo in the above code

$csv_out->print ($fh, $row);
Filehandle $out is needed in place of $fh for writing

$csv_out->print ($out, $row);

~suhail