Please use Text::CSV_XS instead of Text::CSV. The latter has not been updated in six years and the former is a) much faster and b) handles newlines.

For DBMSs that have a LOAD command or loader utility, those propreitary solutions are likely to be better than a hand-rolled one.

Aristotle's advice on placeholders and other improvements are really important.