BEGIN { $SIG{'INT'} = "meineSigInt"; } sub meineSigInt {  # hier dein eigener Code;) }