Perl: Разбиение строки на фрагменты

0

0

Есть строка из 15 символов (возможно состоящая их пробелов). Надо её разбить на фрагменты по 3, 5 и 7 символов и присвоить эти фрагменты элементам массива. Есть идеи?

PS. Скорее всего можно обойтись одной строчкой кода, хотя не уверен.

Ссылка

← Фреймворк для работы с нейронными сетями

C++: считывание из строки данных в массив →

Наверно это не лучший вариант, но вот:

$moja_stroka = "123456789ABCDEF";
@podstroki = $moja_stroka =~ /(.{3})(.{5})(.{7})/;

anonymous
(12.09.04 20:05:18 MSK)

Ссылка

@array = unpack 'a3a5a7', $string

anonymous
(12.09.04 20:09:05 MSK)

Ответ на: комментарий от anonymous 12.09.04 20:09:05 MSK

Спасибо большое, работает :)

zenith ★★★
(13.09.04 02:55:04 MSK) автор топика

Ссылка

Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.

← Фреймворк для работы с нейронными сетями

C++: считывание из строки данных в массив →