VPF::Немнога о моссивах - Форум программистов

DiverD

Дата 15.12.2005, 00:43 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 225
Регистрация: 14.9.2005
Где: Белорусь

Репутация: 1
Всего: 2

К примеру вот дан какойто массив:
@array = qw(1 2 3 4 5 6 7 8 9 ..................................n);
можна ли прочесть к примеру начиная с 4 элемента и до конца?

Еще не пробовал но пологаю что получить число элементов $#array потом сделать пару манипудяций типа + -
А как еще можна?????

--------------------

[ FreeBSD & pERL p0WER eVERY dAY ]

sharq

Дата 15.12.2005, 01:06 (ссылка)

(нет голосов)

Загрузка ...

Perl Liker

Профиль
Группа: Участник
Сообщений: 841
Регистрация: 13.12.2004
Где: Ростов-на-Дону

Репутация: 3
Всего: 28

diverd используя срезы массива:

Код


my @new = @array[4..$#array]; # с четвертого элемента и до конца, жаль что нельзя использовать -1 вместо конца

--------------------

[color=gray]There's More Than One Way To Do It[/color]

Kiber_rat

Дата 15.12.2005, 15:35 (ссылка)

(нет голосов)

Загрузка ...

MACMANIAC

Профиль
Группа: Участник
Сообщений: 276
Регистрация: 18.4.2002
Где: Ashdod, Israel

Репутация: нет
Всего: 9

Это почему же нельзя? smile

Код

my @arr=(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20);
my @new = @arr[4..(@arr-2)];
print "@new\n";

--------------------

Best regards!
@..@_____Ku6ep
=*=______\______KPbIC

Код

print join "",map{chr}(split/(\w{2})/,hex(int(2175.57302796298**2)))

sharq

Дата 15.12.2005, 22:48 (ссылка)

(нет голосов)

Загрузка ...

Perl Liker

Профиль
Группа: Участник
Сообщений: 841
Регистрация: 13.12.2004
Где: Ростов-на-Дону

Репутация: 3
Всего: 28

Kiber_rat я имел в виду нельзя:

Код


@array[4..-1]

А очень хочется. smile

--------------------

[color=gray]There's More Than One Way To Do It[/color]

DiverD

Дата 16.12.2005, 01:05 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 225
Регистрация: 14.9.2005
Где: Белорусь

Репутация: 1
Всего: 2

ну я так и думол/
а есть еще способы, так для написания своей книги "Новые Рецепты : PERL" :):)::)

--------------------

[ FreeBSD & pERL p0WER eVERY dAY ]

sharq

Дата 16.12.2005, 23:16 (ссылка)

(нет голосов)

Загрузка ...

Perl Liker

Профиль
Группа: Участник
Сообщений: 841
Регистрация: 13.12.2004
Где: Ростов-на-Дону

Репутация: 3
Всего: 28

diverd

Цитата(diverd @ 16.12.2005, 02:05)

своей книги

своей не получится. smile

There's More Than One Way To Do It - основной принцип perl!

Можно через цикл (любой) пропустить первые четыре элемента и затем остальные обрабатывать.

smile

--------------------

[color=gray]There's More Than One Way To Do It[/color]

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »