myuserid7 has asked for the wisdom of the Perl Monks concerning the following question:

This is a sample bot.
#!/usr/bin/perl package main; my $bot = Perlbot->new (no_run => 0, server => '', chan +nels => ['#randomtestingchannel']); $SIG{'INT'} = 'Handler'; $SIG{'TERM'} = 'Handler'; sub Handler { $bot->shutdown('Leaving.'); }; $bot->run; package Perlbot; use base qw(Bot::BasicBot);
The bot quits IRC correctly, but it just sits there and reconnects back after 5 minutes. How do I shut it down completely?