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(<D>){
There is nothing that you have to open. If you use the DATA filehandle
then perl will know what to open and do it automagically.
#/usr/sbin/perl
while ( <DATA> ) {
> print $_;
> }
> close(D);
> __DATA__
> This is a test
> and nothing else
> ############
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
