Разделить строку, используя split

@blase · Регистрация: 18.10.2009

Author24 — интернет-сервис помощи студентам

Прошу помощи в регулярном выражении. Надо его использовать в функции split как разделитель.

Задача: отделить по четыре символа из строки в каждую "ячейку" массива.
То есть: разбить эту строку: 1111222233334444555566667777888899990000
Вот так: 1111 2222 3333 4444 5555 6666 7777 8888 9999 0000
и поместить полученное в каждую "ячейку" массива отдельно.

Я написал так:

Perl

1 2	$num="1111222233334444555566667777888899990000"; @arrnum=split("(.{4})",$num2);

но получилось, что массив @arrnum записал это в себя только по четным ячейкам, то есть:

Perl

@arrnum[0] # пустой
@arrnum[1] # 1111
@arrnum[2] # пустой
@arrnum[3] # 2222
@arrnum[4] # пустой
@arrnum[5] # 3333
# и т.д.

почему так произошло, и как правильно написать?

@Unrealler · 12.04.2011, 18:40

А зачем вам split? Можно обойтись и без него:

Perl

$num="1111222233334444555566667777888899990000";
@arrnum=$num=~/.{1,4}/g; #чтобы если в конце осталось меньше 4-х символов, то они тоже добавились
$,="\n";
print @arrnum;

@blase · 12.04.2011, 18:44 **[ТС]**

ухтыы), спасибо,
незнал что так можно, я только учу perl), хороший язык)

volodin661 · 19.08.2017, 21:57

РУБРИКА: ЛИСТАЯ СТАРЫЕ СТРАНИЦЫ

язык-то хороший, а в данном случае эффективнее всего использовать unpack:

Perl

1	@arrnum = unpack '( a[4] )*', $num

Сообщение от blase

Perl

1	@arrnum=split("(.{4})",$num2);

но получилось, что массив @arrnum записал это в себя только по четным ячейкам, то есть:@arrnum[0] # пустой

Perl

@arrnum[1] # 1111[SIZE="3"][/SIZE]
@arrnum[2] # пустой
@arrnum[3] # 2222
@arrnum[4] # пустой
@arrnum[5] # 3333
# и т.д.

почему так произошло, и как правильно написать?

что касается вопроса почему так произошло,
то тут всё дело в захватывающих скобках,
которые для regex-аргумента split не нужны.

Если бы скобок не было, вернуть он должен был массив из значений undefined
( напоминаю, что split - это функция, возвращающая несовпадающие фрагменты,
то есть, для строки '12+34+56' и аргументом у split '+', вернутся несовпадающие с '+' фрагменты:
12, 34, 56. А для аргумента у split /./ вернутся 9 значений undefined ).

Но скобки были, поэтому в выходной массив попали и собственно захваченные сепараторы 1111, 2222, 3333 итд.

Строго говоря, если вернуться к моему примеру
@array = split /./, "12+34+56"
то никакие undefined в массив бы не вернулись, поскольку хвостовые undefined холодно выбрасывает сам split.
Вернулся бы просто пустой массив.
Чтобы они вернулись, надо было бы использовать трёхаргументную форму с отрицательным счётчиком:
@array = split /./, "12+34+56", -1

volodin661 · 19.08.2017, 22:06

Да, а в начале-то надо было написать следующее:

функция split для задачи blase совсем не нужна.

@blase 3 / 3 / 1 Регистрация: 18.10.2009 Сообщений: 83
	12.04.2011, 18:44 [ТС]	3
	ухтыы), спасибо, незнал что так можно, я только учу perl), хороший язык) 0

volodin661 5986 / 1995 / 323 Регистрация: 10.12.2013 Сообщений: 6,878
	19.08.2017, 22:06	5
	Да, а в начале-то надо было написать следующее: функция split для задачи blase совсем не нужна. 0

Разделить строку, используя split

Решение