|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Maxim Grigoryev 2:462/177.10 01 Jul 2001 02:18:46
To : Alexander Babanov
Subject : Подпрограма
--------------------------------------------------------------------------------
28.06.01 21:47:21: Alexander Babanov => Maxim Grigoryev ="Re: Подпрограма".
MG>> #Это обрезание последнего символа, я не очень понимаю, только смутно
MG>> догадываюсь.
MG>> #Hо без него вынь делала пустую строку после каждой нормалной
MG>> строки :(
AB>
AB> Дык, не печатал бы \n где не надо :) И лучше таки chomp, безопаснее...
Мне почему-то казалось, что я обрезаю \r..., все-таки последний символ строки в
выне -
это возврат каретки.
AB>
MG>> chop(@massive); #Ща буду вызывать процедуру...
2ALL: Спасибо всем ответившим.
И напоследок.
Получение значения параметров путем присвоения списком это канечна хорошо, но
если нада
передать два масива и несколько переменных, а может еще и хеш?
Выход из этой ситуации, как я понял, такой:
#Глобальный массив
@blat=(1,3,5,7,10);
#Перед вызовом подпрогамы нуно ее обьявить
#В прототипе передаем в первом елементе ссылку на нужный нам масив
sub add (\@$$)
{
$value1=$_[1];
$value2=$_[2];
@value3=@blat;
return @value3;
#Еще один нюанс
#При использовании прототипов не нужно использовать префикс для вызова
подпрограм
add(@blat,$gas1,$gas2);
#Кто-нибудь знает каким еще способом можна передать два и больше одного массива
подпрогаме?
--- WP/95 Rel 1.78E (215.0) Reg.
* Origin: Under construction... (2:462/177.10)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Подпрограма 