При чтение файлов с open() - проглатываются "<"

[CYBERXристос]

Итак сабж :?: .

Можетъ кто-нибудь сталкивался...

читаю файл так :shock: :

open (FILE, "< txt.txt");
undef($/);
$whole_file = <FILE>;

Если в файле есть строки вида: ааааа<ббббб>вввв
На выходе получим: ааааабббббвввв :evil:
-----
В программе исп. модули Cwd, File:Find, CGI, LWP

Для проверки я написал коротенькуЯ программу как см.выше :!: .
Всё работает нормально. А в составе большой программы - "глотает" <>.

Спасибо за внимание !

[AiK]

Дык баги в большой программе вестимо. Причём скорее всего этим CGI заведует. Причём когда на выход отдаёшь.

[CYBERXристос]

Вряд ли... Как раз это возникает при входе. Так как входная информация обрабатывается регэкспами, которые ессно ничего не видят.. так как пытаются найти выражения вида: $var =~ /<xxx>/;
Раньше у меня такого не было в CGI программах. Я грешу на модуль
File:Find... потому что, например, из-за него Perl перестает видеть
пути к файлам вида: ./xxx/