#!C:\perl\bin\perl
open(TXT, ";
close(TXT);
print "Content-type:text/html\n\n ";
print "Text file contents:";
foreach $line(@text)
{
print "$line ";
}
print "";
# This will loop through all the line in the file,
# substitute commas with pipes on each line,
# and print the line to STDOUT.
ope
Donald Beck wrote:
> I am running Perl on Windows XP Pro. I am new to
> Perl.
>
> I am trying to write a script that will take a text
> file with multiple rows and a reoccurring character
> that I want replaced, then the output written to
> another text file.
>
> Here is what I have come up wit
I am running Perl on Windows XP Pro. I am new to
Perl.
I am trying to write a script that will take a text
file with multiple rows and a reoccurring character
that I want replaced, then the output written to
another text file.
Here is what I have come up with (actually I got it
out of a book):
