Mega Code Archive

 

Categories / Perl / Language Basics

 

Print out here document

$display = 1; if ($display) {     print <<EOD; This  is  a  "here"  document. EOD }