Mega Code Archive

 
Categories / Perl / Report
 

Passing value to the format

format STDOUT = @<<<<<<<<<<<@<<<<<<<<<<<<<<< $text1      $text2 @<<<<<<<<<<<@<<<<<<<<<<<<<<< $text3      $text4 . $text1 = "Hello"; $text2 = "there!"; $text3 = "How're"; $text4 = "things?"; write;