redirect script failling

[David Gilden]

Can someone point why the following is not working?

Thanks
Dave G.

#!/usr/bin/perl -w


use CGI qw/:standard/;
use CGI::Carp qw(fatalsToBrowser);
use POSIX 'strftime';

$which_button = lc(param('submit'));

print header;

print $which_button;

if ($which_button eq "continue to next section") {

        print redirect('http://www.kayaking.net/pages/release_risk.html');
    exit;
    }   elsif ($which_button eq "continue to last section") {

        print redirect('http://www.kayaking.net/pages/reg_payment_options.html');
    exit;
    }

*====================================================*
*   Cora Connection Your West African Music Source   *  
*   http://www.coraconnection.com/                   *  
*   Resources, Recordings, Instruments & More!       *
*====================================================*

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]