Re: Using multliple formats when writing to a file


laziness, impatience, and hubris
	PerlMonks

Re: Using multliple formats when writing to a file

by GotToBTru (Prior)

on Jun 06, 2014 at 16:41 UTC ( [id://1089063]=note: print w/replies, xml )

Need Help??

in reply to Using multliple formats when writing to a file

open (REPORT,">$filename") || die "error";
select(REPORT);
...
$^ = "NEWPAGE";
...
foreach [outer loop]
   $~ = "FIRST_FORMAT";
   write;

   foreach [inner loop]
      $~ = "SECOND_FORMAT";
      write;

   [end inner loop]

[end outer loop]

close (REPORT) || die ...
[download]

1 Peter 4:10