Help for this page
#!/usr/bin/perl system ("clear");print <<END_of_Multiline_Text; ... END_of_Multiline_Text