#!/usr/local/bin/perl use CGI qw(:standard); use lib "/html/u/rewards"; require "club_lib.pl"; $form = new CGI; chop($system = `uname -n`); $system = "cbs" unless $system eq "stage1"; $session_id = $form->cookie('SessionID'); %spl = $form->cookie('SportsLine'); if ($spl{'club'} eq 'yes') { print $form->redirect("http://$system.sportsline.com/u/rewards/sc/sportspage/cgi-bin/sportspage.cgi"); } else { print $form->redirect("http://$system.sportsline.com/u/rewards/mspsignup.htm"); }