|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Ilya Anfimov 2:5020/400 20 Feb 2006 20:48:40 To : Alexander Demin Subject : Re: HTTP::Cookies -------------------------------------------------------------------------------- 2006-02-20, Alexander Demin <support@spectrum.ru> пишет: > Ещё раз всем привет. > Подскажите где я не прав. > > #!/usr/bin/perl -w > > use strict; > use CGI qw( -no_xhtml :all ); > use CGI::Pretty qw( :html4 ); > use HTTP::Request; > use HTTP::Cookies; > use LWP::UserAgent; > > my $cgi = new CGI; > my $cookie_jar = HTTP::Cookies->new; > > $cookie_jar->set_cookie( undef, "SessionId", "kjahjjk", undef, > "www.spectrum.ru", undef, undef, undef, undef, undef, undef ); > > print $cgi->header(-type=>'text/html'); > > print $cookie_jar->as_string; > > exit; > > $cookie_jar->set_cookie - создаю cookie. > Hо почему ничего не выводится на экран? Переборщил с undefами. maxage, как минимум. > > Подскажите пожалуйста. > --- ifmail v.2.15dev5.3 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по:
Архивное /ru.cgi.perl/191707dbe31d8.html, оценка из 5, голосов 10
|