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,
>
> 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(<D>){
> print $_;
> }
> close(D);
> __DATA__
> This is a test
> and nothing else
> ############
>
> the execution of the program should give:
> This is a test
> and nothing else
>
>
> This example does not work, but I know that there is something like that
> in perl, and it will be great if someone point me the right way to do
> this. By the way, I am familiar with the print<<END; anything
> END
> but this is not what I want. Thanks in advance for any positive
> response.
>
> cheers
> *******************************************************************
> PEDRO A. RECHE , pHD TL: 617 632 3824
> Bioinformatics Research Scientist FX: 617 632 4569
> Dana-Farber Cancer Institute, EM: [EMAIL PROTECTED]
> Molecular Immunology Foundation, EM: [EMAIL PROTECTED]
> Harvard Medical School, W3: http://www.mifoundation.org
> 44 Binney Street, D1510A,
> Boston, MA 02115
> *******************************************************************
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
