powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Можно без if удалить последний элемент массива ?
17 сообщений из 17, страница 1 из 1
(Perl) Можно без if удалить последний элемент массива ?
    #33259101
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно без if удалить последний элемент массива если он пустой
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259167
Ksnk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
$a=array("one","two","three");
unset($a[count($a)- 1 ]);
Правда только для такого массива, без "дырок". :)
А как удалять с помощью if?
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259195
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я про удаление пустого элемента...
Как в принципе удалить элемент с конца понятно...
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259205
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я имел ввиду:
unset($a[count($a)-1]) if $a[count($a)-1]='';
Может что ещё есть?
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259210
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пардон,
unset($a[count($a)-1]) if $a[count($a)-1] eq '';...
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259234
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modМожно без if удалить последний элемент массива если он пустой

Да легко используй unless


можеш конечно и поизвращаться:

Код: plaintext
1.
2.
3.
my @array = (  1 ,  2 ,  4 ,  2  );

$#array -= abs (  1  - defined $array[$#array] );

Тока учти что логические проверки там в обоих случаях есть, иначе как ты собрался орпределять пустой элемент или нет ???
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259243
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modПардон,
unset($a[count($a)-1]) if $a[count($a)-1] eq '';...

...вообще товарисчь вроде про перл спрашивал...
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259260
Ksnk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
g613...вообще товарисчь вроде про перл спрашивал...
Sorry! Торможу...
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259265
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кстати да! РHP не предлагать!
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259293
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
g613 Сэнкс! Так веселее...
if короче писать чем unless....
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259971
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может еще так

Код: plaintext
@arr[$#arr] || pop(@arr);

А чем if-то не угодил? ;-) И что в perl за array и unset, какой-то новый синтаксис?
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33259974
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
совсем шиза... конечно точнее -

$arr[$#arr] || pop(@arr);
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33260319
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
--null--совсем шиза... конечно точнее -

$arr[$#arr] || pop(@arr);

так с массивом qw( 1 2 3 0 ) не корректно отработает, тоесть 0 еще вроде не пустой но уже не истина... :)

P.S.
у меня abs правда там тоже излишество... :)
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33260370
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
действительно.
тада так

Код: plaintext
defined($a[$#a]) || pop(@a);
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33260416
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
$a[$#a] == $a[-1] # короче на один символ :)
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33260512
nik2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
LeXa NalBat$a[$#a] == $a[-1] # короче на один символ :)


а в случае более длинного имени массива соответственно еще короче.

логично.
...
Рейтинг: 0 / 0
(Perl) Можно без if удалить последний элемент массива ?
    #33261422
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
--null--Может еще так

...И что в perl за array и unset, какой-то новый синтаксис?
а там этого и нету... Но надо же как-т с народом общатся на их языке...
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Можно без if удалить последний элемент массива ?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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