Mercurial > pub > Impl
diff _test/test_cgi.pl @ 427:09e0086a82a7 ref20150831 tip
Merge
author | cin |
---|---|
date | Tue, 15 May 2018 00:51:33 +0300 |
parents | c27434cdd611 |
children |
line wrap: on
line diff
--- a/_test/test_cgi.pl Tue May 15 00:51:01 2018 +0300 +++ b/_test/test_cgi.pl Tue May 15 00:51:33 2018 +0300 @@ -1,11 +1,3 @@ #!/usr/bin/perl use strict; -use CGI qw(-nph); - -my $q = CGI->new({}); - -print $q->header({ - type => 'text/html', - X_My_header => 'some data' -}); \ No newline at end of file