Searched refs:CGI (Results 1 - 25 of 52) sorted by relevance

123

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/t/
H A Dpopup_menu.t4 use CGI;
6 my $q = CGI->new;
16 CGI::popup_menu(-values=>[CGI::optgroup(-values=>["b+"])],-default=>"b+"),
H A Dquery_string.t6 use CGI;
9 my $q1 = CGI->new('b=2;a=1;a=1');
10 my $q2 = CGI->new('b=2&a=1&a=1');
H A Dfast.t13 () = $CGI::Q;
14 () = $CGI::Fast::Ext_Request;
19 require CGI::Fast;
20 ok( my $q = CGI::Fast->new(), 'created new CGI::Fast object' );
21 is( $q, $CGI::Q, 'checking to see if the object was stored properly' );
24 ok( $q = CGI::Fast->new({ foo => 'bar' }), 'creating object with params' );
29 is( $CGI::Fast::Ext_Request, undef, 'checking no active request' );
31 is($CGI::PRIVATE_TEMPFILES,0, "reality check default value for CGI
[all...]
H A Dinit.t6 use CGI;
12 my $q = CGI->new($IN);
H A Drequest.t8 use CGI ();
17 # Set up a CGI environment
29 my $q = new CGI;
30 ok $q,"CGI::new()";
31 is $q->request_method => 'GET',"CGI::request_method()";
32 is $q->query_string => 'game=chess;game=checkers;weather=dull',"CGI::query_string()";
33 is $q->param(), 2,"CGI::param()";
34 is join(' ',sort $q->param()), 'game weather',"CGI::param()";
35 is $q->param('game'), 'chess',"CGI::param()";
36 is $q->param('weather'), 'dull',"CGI
[all...]
H A DuploadInfo.t5 # Shamelessly stolen from Data::FormValidator and CGI::Upload #
11 use CGI;
39 'GATEWAY_INTERFACE' => 'CGI/1.1',
66 open STDIN, '<../lib/CGI/t/upload_post_text.txt'
69 $q = CGI->new;
78 my $q2 = CGI->new;
H A Dcookie.t12 use CGI::Util qw(escape unescape);
14 use CGI::Cookie;
33 my $result = CGI::Cookie->parse($test_cookie[0]);
36 my @result = CGI::Cookie->parse($test_cookie[0]);
39 @result = CGI::Cookie->parse($test_cookie[1]);
42 my %result = CGI::Cookie->parse($test_cookie[0]);
48 my @array = CGI::Cookie->parse('');
49 my $scalar = CGI::Cookie->parse('');
53 @array = CGI::Cookie->parse(undef);
54 $scalar = CGI
[all...]
H A Dcharset.t8 use CGI;
10 my $q = CGI->new;
H A Dcheckbox_group.t5 BEGIN { use_ok('CGI'); };
6 use CGI (':standard','-no_debug','-no_xhtml');
16 $CGI::XHTML = 1;
H A Dhttp.t8 use CGI;
10 my $cgi = CGI->new();
H A Dparam_fetch.t6 use CGI;
9 my $q = CGI->new('b=baz;a=foo;a=bar');
H A Dutf8.t11 use_ok( 'CGI' );
13 ok( my $q = CGI->new, 'create a new CGI object' );
17 $CGI::PARAM_UTF8 = 1;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/examples/
H A Dcrash.cgi3 use CGI::Carp qw(fatalsToBrowser);
H A Dnph-multipart.cgi2 use CGI qw/:push -nph/;
H A Dclickable_image.cgi3 use CGI;
4 $query = new CGI;
H A Dinternal_links.cgi3 use CGI;
4 $query = new CGI;
H A Ddiff_upload.cgi6 use CGI qw(:standard);
7 use CGI::Carp;
11 print "<strong>Version </strong>$CGI::VERSION<p>";
50 <A HREF="../cgi_docs.html">CGI documentation</A>
H A Dnph-clock.cgi3 use CGI::Push qw(:standard :html3);
H A Dpopup.cgi3 use CGI;
4 $query = new CGI;
H A Dfile_upload.cgi5 use CGI qw(:standard);
6 use CGI::Carp qw/fatalsToBrowser/;
10 print strong("Version "),$CGI::VERSION,p;
64 a({href=>"../cgi_docs.html"},"CGI documentation"),
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/
H A DApache.pm1 package CGI::Apache;
2 use CGI;
11 CGI::Apache - Backward compatibility module for CGI.pm
H A DSwitch.pm1 package CGI::Switch;
2 use CGI;
12 CGI::Switch - Backward compatibility module for defunct CGI::Switch
H A DPretty.pm1 package CGI::Pretty;
11 use CGI ();
13 $CGI::Pretty::VERSION = '3.46';
14 $CGI::DefaultClass = __PACKAGE__;
15 $CGI::Pretty::AutoloadClass = 'CGI';
16 @CGI::Pretty::ISA = qw( CGI );
23 return if !$CGI::Pretty::LINEBREAK || !$CGI
[all...]
H A DFast.pm1 package CGI::Fast;
22 $CGI::Fast::VERSION='1.08';
24 use CGI;
31 @ISA = ('CGI');
68 CGI->_reset_globals;
69 $self->_setup_symbols(@CGI::SAVED_SYMBOLS) if @CGI::SAVED_SYMBOLS;
70 return $CGI::Q = $self->SUPER::new($initializer, @param);
77 CGI::Fast - CGI Interfac
[all...]
H A DCarp.pm1 package CGI::Carp;
5 B<CGI::Carp> - CGI routines for writing to the HTTPD (or other) error log
9 use CGI::Carp;
17 use CGI::Carp qw(cluck);
20 use CGI::Carp qw(fatalsToBrowser);
25 CGI scripts have a nasty habit of leaving warning messages in the error
34 use CGI::Carp
58 use CGI::Carp qw(carpout);
62 called in a C<BEGIN> block at the top of the CGI applicatio
[all...]

Completed in 51 milliseconds

123