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