Чтение файла с разделением по шаблону

[Perlita]

Помогите люди добрые!!!

Имеется нетекстовый файл  В файле содержаться строки с разделителем (байт 1F, до и после строки)
Требуется прочитать эти строки в массив.
Решение вида:
$s=<>;$st=copy($s,i,j);@mas=split(chr(1F),$st) - не работает...;(

[Chs]

perldoc -f chr
perldoc -f split
perldoc perlop

Код: [Выделить]


#!/usr/bin/perl
$_ = "\\x1fstring\\x1f";
@a = split(/\\x1f/);
print @a;


[Perlita]

Спасибо добр. человек за изящный ответ... все работает, все летает. Еще раз убеждаюсь, что с этой "колбасней" (рег. выр.) надо хорошо разобраться