[EMAIL PROTECTED] (Russ Foster) writes:
> 1: Open (INFILE, "report.txt" ;
> 2: While (<INFILE>) {
> 3: $line =~ /\"(.+?)\"/ ;
> 4: $YourTextBetweenTheQuotes = $1 ;
> 5: # Do whatever you want
> 6: }
> 7: Close (INFILE)
Properly capitalized, thats...
1: open (INFILE, "report.txt" ;
2: while (<INFILE>) {
3: $line =~ /\"(.+?)\"/ ;
4: $YourTextBetweenTheQuotes = $1 ;
5: # Do whatever you want
6: }
7: close (INFILE)
Seems that a WinDOS file system insinuated itself on your
Perl keywords....
--
Michael R. Wolf
All mammals learn by playing!
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
