The driver code: guided tour

Part 2: Daemonize and configuration

fork() && exit;  # Daemonize

our $bit_assignments = {

    1 => 'http://radiofreepeterborough.ca', # some web tests
    2 => 'http://radiotarahumara.com',
    3 => 'http://radiofreenetwork.ca',
    4 => 'http://streams.radiofreepeterborough.ca:8000/status.xsl',
    5 => 'http://trentradio.ca:8800/status.xsl',
    6 => '64.111.110.104',
    7 =>  sub { 
       radio_listeners(
         'http://streams.radiofreepeterborough.ca:8000/status.xsl')  
       },
    };

our $sleep_duration = 10;  # how long to sleep between cycles?