Mega Code Archive
Categories
/
Perl
/
String
The Heredoc Operator without Variable Interpolation
sub printHeaders(){ print<<'eof'; Content-Type: text/html <HTML> <HEAD> <TITLE>Page</TITLE> </HEAD> <BODY background="back.gif"> eof return (1); }