The code below does seem to work, and someone please show where I went wrong.
Thx
Dave
------------------------------------------

### Set Cookie


#!/usr/bin/perl -w

use CGI qw/:standard/;


my $new_cookie = cookie(
-name => "bears",
-values => ['Sweater','Seymore','Bearnard','Blondie'],
);

print header; 

print start_html('Show Us Your Cookies');

print h1('Cookie Set'),

a( {-href => 'show_cookie.cgi'}
,'See Cookie');


print end_html;
exit;


-----------------------------


### Show Cookie


#!/usr/bin/perl -w

use CGI qw/:standard/;


my @crumbs;
@crumbs = cookie();

print header; 

print start_html('Show Us Your Cookies');

       
foreach my $c (@crumbs){
print p("$c"),"\n";
}



print end_html;
exit;


__END__




*====================================================*
*   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]

Reply via email to