There might be modules to build a fully blown template system, but in a crude fashion you could just do this kind of thing:
use strict; use warnings; my $row = [ "input", "format", "description", "recdate", "cabinet", "f +older" ]; print <<"DOC"; [DOCUMENT] INPUT=$$row[0] FORMAT=$$row[1] DESCRIPTION=$$row[2] RECDATE=$$row[3] DELETEINPUT=NO NODE_ID=1 VOLUME_ID=1 [CBNTFLDR] CABINET=$$row[4] FOLDER=$$row[5] [USER_DEFINITIONS] Freq:Daily Application: DOC print "\n";
Of course, you would need to first open your .doc file with the correct name and add the file handle to the print statement.
In reply to Re: How to generate the .doc file for each row from a csv file
by hdb
in thread How to generate the .doc file for each row from a csv file
by perladdict
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |