#!/usr/bin/perl

use strict;
use warnings;
use CGI qw(:standard);

print header;
print start_html("Print 123");
print "123";
print end_html;
