Help for this page
#!/usr/bin/perl ... } close (MYFILE);
#!/usr/bin/perl local $/; ... # process each line } print $txt;