#!c:/Perl/bin/Perl -wT use strict; use CGI qw/:standard/; print header; print "can you hear me"; #this does print, nothing else does print ""; print ""; my $javascript = <<'TOAD'; TOAD print ""; my $javanext = <<'FROG'; FROG print "";