Mercurial > pub > Impl

view _test/test_cgi.pl @ 390:de1f875e8875

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added reverse matching lookup to TypeKeyedCollection (find closest descendant)
author cin
date Wed, 12 Feb 2014 18:02:03 +0400
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'
});