Mega Code Archive

 

Categories / Perl / Report

 

A program that uses a value field that does formatting

#!/usr/local/bin/perl  $string = "Here\nis a line of\ntext.\n";  $~ = "OUTLINE";  write;  format OUTLINE =  ^<<<<<<<<<<<<<<<<<<<<<<<<<<<  $string  .