Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
|
начальный perl 01.12.01 19:50 Число просмотров: 990
Автор: Oleg St. Статус: Незарегистрированный пользователь
|
> #!/usr/bin/perl -w > @word=qw(1 2 3 4 5 6); > $name=<STDIN>; > chomp $name; > $sw=$word[$name]; # почему тут присваивается значение на > индекс > #больше чем ввели. > print $sw,"\n"; > по идее должно присваиваться то же > ??? если не сложно отзовитесь
По умолчанию индексы массивов в Perl начинаются с нуля.
Поэтому $word[0] == 1, $word[1] == 2 и т.д.
Присвой $[ = 1 или используй $sw = $word[$name-1]
|
<programming>
|
начальный perl 30.11.01 20:58
Автор: het Статус: Незарегистрированный пользователь
|
#!/usr/bin/perl -w
@word=qw(1 2 3 4 5 6);
$name=<STDIN>;
chomp $name;
$sw=$word[$name]; # почему тут присваивается значение на индекс
#больше чем ввели.
print $sw,"\n";
по идее должно присваиваться то же
??? если не сложно отзовитесь
|
|
начальный perl 01.12.01 19:50
Автор: Oleg St. Статус: Незарегистрированный пользователь
|
> #!/usr/bin/perl -w > @word=qw(1 2 3 4 5 6); > $name=<STDIN>; > chomp $name; > $sw=$word[$name]; # почему тут присваивается значение на > индекс > #больше чем ввели. > print $sw,"\n"; > по идее должно присваиваться то же > ??? если не сложно отзовитесь
По умолчанию индексы массивов в Perl начинаются с нуля.
Поэтому $word[0] == 1, $word[1] == 2 и т.д.
Присвой $[ = 1 или используй $sw = $word[$name-1]
|
|
|