#! /usr/bin/env perl
use strict;
use warnings;

printf("delete from table_name;\n");
print "BEGIN;\n";
while(<>)
{
        chop;
        $_ =~ s/"//g; 
        my ( $a, $b, $c ) = split(/,/);
        printf("INSERT INTO table_name VALUES ('$a','$b','$c');\n");
}
print "COMMIT;\n";
exit;