$SIG{TERM} = sub { 
    `rm -f /usr/local/var/odbcbridge/odbcbridge.pid` ; exit 0 
    }; 

Example 3: Perl SIGTERM handler from the ODBC peer-to-peer server.