Pedro Antonio Reche wrote:
>
> Hi All,
Hello,
> I would like to read and process line by line (using while) some text
> embeded into my perl script.
> I tried something like:
>
> #/usr/sbin/perl
>
> open(D, "__DATA__");
> while(){
There is nothing that you have to open. If you use the DATA f
You have to include the go_next; in your while loop.
Jair
- Original Message -
From: "Pedro Antonio Reche" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, June 06, 2003 3:40 PM
Subject: processing text in perl script
> Hi All,
>
Hi All,
I would like to read and process line by line (using while) some text
embeded into my perl script.
I tried something like:
#/usr/sbin/perl
open(D, "__DATA__");
while(){
print $_;
}
close(D);
__DATA__
This is a test
and nothing else
the execution of the prog