|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Ivan Prokudin 2:5020/1724.60 29 Dec 2000 02:05:48
To : ALL
Subject : Out of memory при использование ref'ов на хеш
--------------------------------------------------------------------------------
Есть data.txt:
00:00|00:45
aaa|zzz|sss
00:55|01:30
bbb|rrr|aaaaaaaaa
02:11|03:48
aaaa|dddd|qqqq
05:06|07:08
qqqqq|qqqqqqqqqqq|aaaaaaaaaaaaaaaaaaaa
Есть ее парсер:
#!/usr/bin/perl -w
open (DATA, "./data.txt");
$i=1;
while (<DATA>) {
if (length != 0)
{
($lessons[$i]->{'beg'},$lessons[$i]->{'end'})=split /\|/;
$_=<DATA>;
($lessons[$i]->{'predv'},$lessons->[$i]{'main'},$lessons->[$i]{'aft'})=
split /\|/;
$i++;
}
}
foreach (@lessons) {
print "Lesson $_ begins on " . $lessons[$_]->{'beg'} . "and
ends on " . $lessons[$_]->{'end'};
}
Hе пашет говоря:
:!./parser.pl
Use of uninitialized value in concatenation (.) at ./parser.pl line 14, <DATA>
line 10.
Use of uninitialized value in array element at ./parser.pl line 14, <DATA> line
10.
Use of uninitialized value in concatenation (.) at ./parser.pl line 14, <DATA>
line 10.
Out of memory!
1 returned
Почему? Помогите, плз...А то я рефы первый раз юзаю...
С u l8r, Ivan (cyberbat@newmail.ru) 29 декабря 2000 года
icq# 2052068
... А ты вступил в международную FTN Unixnet?
--- Это письмо рождено в муках голым дедом версии 1.1.4.7/LNX.
* Origin: Что ты знаешь о цвете неба?(C)Dolphin (2:5020/1724.60)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
