Mercurial > pub > Impl

view _test/test_cgi.pl @ 417:3ed0c58e9da3 ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
working on di container, tests
author cin
date Mon, 02 Nov 2015 01:56:53 +0300
parents 6d8092d8ce1b
children c27434cdd611
line wrap: on
line source

#!/usr/bin/perl
use strict;

use CGI qw(-nph);

my $q = CGI->new({});

print $q->header({
    type => 'text/html',
    X_My_header => 'some data'
});