[Comm] Test, sorry... ah, perl...

[Alexey Tourbin]

Test, sorry...

Здесь недавно спрашивали буквально следующее:

> Естьт некий текстовый файл, в нём в несколько колонок ( и строк
> соотвественно). Но меджу колонками в качестве разделителя идут..
> пробелы. Причём между колонками их число (пробелов) не одинаковое. (от
> 1 до 10). Вопрос --как бы данные загнать в массив? количество колонок
> известно..

Так вот, делается это буквально так:

	@parts = split ' ', $var;

Из perldoc -f split:

	As a special case, specifying a PATTERN of space (' ') will
	split on white space just as "split" with no arguments does.
	Thus, "split(' ')" can be used to emulate awk's default
	behavior, whereas "split(/ /)" will give you as many null
	initial fields as there are leading spaces.  A "split" on
	"/\s+/" is like a "split(' ')" except that any leading
	whitespace produces a null first field.  A "split" with no
	arguments really does a "split(' ', $_)" internally.
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/community/attachments/20050624/acf29882/attachment-0003.bin>