Гость
Войти | Профиль | Очистить
Действия ...
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl -- Чтение файла построчно / 4 сообщений из 4, страница 1 из 1
17.04.2020, 12:19
    #39948329
Zankoku
Zankoku
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl -- Чтение файла построчно
Доброго времени суток, дамы и господа, леди и джентельмены!

При чтении файла возникла какая (на мой взгляд) странная ситуация.

Вариант 1:
Код: ruby
1.
2.
3.
while (my $line = <FILE>) {
say $line;
}



Вариант 2:
Код: ruby
1.
2.
3.
while (<FILE>) {
my $line = <FILE>;
  say $line;



файл:
sep=,
2
3
4
5
Вывод при первом варианте:
Код: plaintext
1.
2.
3.
4.
sep=,
2
3
4
5
Вывод при втором варианте:
Код: plaintext
1.
2.
3.
4.
5.
6.
2

4

Use of uninitialized value $line in say at importBD.pl line 23, <FILE> line 5.

Почему?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.04.2020, 16:24
    #39948413
volodin661
volodin661
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl -- Чтение файла построчно
Zankoku,

Код: php
1.
2.
3.
4.
5.
6.
while ( !eof FILE ) {

    my $line = <FILE>;
    print $line;

}
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.04.2020, 16:49
    #39948428
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl -- Чтение файла построчно
Zankoku
При чтении файла возникла какая (на мой взгляд) странная ситуация.
Ничего странного. Ты дважды читаешь из файла.
Каждый вызов <HANDLE> это чтение следующей строки. Либо ты ее сразу в свою переменную читаешь, либо в стандартный $_. Из которого уже и надо брать данные в свою переменную или как-нибудь использовать.
Код: ruby
1.
2.
3.
while (<FILE>) {
  my $line = $_;
  say $line;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.04.2020, 16:12
    #39949002
Zankoku
Zankoku
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl -- Чтение файла построчно
Спасибо! Буду знать (:
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl -- Чтение файла построчно / 4 сообщений из 4, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 417ms
Закрыть
start [/forum/topic.php?fid=23&mobile=1&tid=1459707]:
 0ms
get settings:
 12ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 36ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 276ms
total:  417ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]