Select Code to Download

    $admincookie = new CGI::Cookie(-name=>'LSRfm_admin',
                               -value=>{ username => barrycarlyon,
                                         password => md5_hex_value } 
                               );

#fetch the (cgi)type cookie
sub _cookie {
...
  }
return $lsrfm_cookie;
}