Hi,
I have created a word doc using a PERL script. Now, i want to format the data that i enter i.e. i want it in the form of tables ..can anyone please help me on this .
i am writing my code below:
format CD_REPORT =
Album=
@<<<<<<<<<<<<< Artist=
@>>>>>>>>>>>> Price=$
@##.##
$album, $artist, $price
.
@lines ="HELLO!NEW!22";
open(CD_REPORT, ">format.doc");
foreach (
@lines) {
chop;
($album, $artist, $price) = (split(/!/));
$album = "" if !defined($album);
$artist = "" if !defined($artist);
$price = 0 if !defined($price);
write(CD_REPORT);
}
close(CD_REPORT);
