#!/usr/bin/perl -Tw use CGI qw(:standard); use strict; $| = 1; print header("text/plain"); print "output from $0\n";