You probably don't have to do anything. The default handler for SIGINT (Ctrl-C) does a graceful shutdown. Perl's ordinary destruction mechanism should close the DBI connection for you. If it doesn't, you can write a sub DESTROY which does that for you.