\347\204\241\347\262\276\343\201\247\347\237\255\346\260\227\343\201\247\345\202\262\346\205\242\343\201\252\343\203\227\343\203\255\343\202\260\343\203\251\343\203\236 | perl+DBI \343\203\227\343\203\255\343\202\260\343\203\251\343\203\240\343\201\256\351\211\204\345\211\207 - RaiseError \343\201\250 AutoCommit