#! /usr/bin/env perl use strict; use warnings; use 5.010; use CGI qw( :all ); print header( "text/html" );