#!usr/bin/perl

$STDOUT_OVERRIDE_VARIABLE= print <<HTMLCODE;
ZXCZXC
zxcZXCzx
zxczxczxc
zxczxczxzx
HTMLCODE