ВФЕФ

От Evgeny Chevtaev (2:5010/275) к Dmitry Ivanov

Hi Dmitry!

Thursday February 04 2021 04:24, Dmitry Ivanov wrote to All:

 DI> Глупый вопрос про __DATA__

 DI> Есть очень условный скрипт

 DI> my $i;

 DI> for $i ( 1 .. 3 ) {

 DI>     while (<DATA>) {

 DI>         print "$i+$_\n";

 DI>     }

 DI> }

 DI> __DATA__

 DI> 4

 DI> 5

 DI> 6

 DI> так   вот   на   первой  итерации  ($i  =  1 DATA "заканчивается". Как

 DI> начатьчитать ее сначала?

my @data = <DATA>;

for my $i ( 1 .. 3 ) {

    foreach (@data) {

        print "$i+$_\n";

__DATA__

Так подойдёт?

With best regards,

Evgeny

--- GoldED+/BSD 1.1.5-b20180707

 * Origin: Powered by FreeBSD 12.2-RELEASE-p3 (2:5010/275)

Ответы на это письмо:

From: Username
Заголовок следующего сообщения в треде может быть длинным и его придется перенести на новую строку

From: Username
Или коротким

__ВФЕФ__