|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 15 Apr 2002 15:07:30
To : "Fedor Krovopuskoff"
Subject : Re: perlre: переносимость re между Unix
--------------------------------------------------------------------------------
Здравствуй, Fedor Krovopuskoff.
FK> Всем привет!
FK> Вот иллюстрация проблемы, с которой я столкнулся:
FK> Есть файл с данными (test.dat):
FK> ------------------
FK> qwertyuiop
FK> DATA: 12-04-02
FK> ДАТА: 12-04-02
FK> asdfghjkl
FK> ------------------
FK> ... и моя программа:
FK> ------------------
FK> #!/bin/perl -w
FK> open(MYFILE, './test.dat');
FK> undef $/;
FK> while(<MYFILE>){
FK> if($_=~/^.*?DATA:\ +.*$/s){
FK> print "DATA Ok!\n";
FK> }
FK> if($_=~/^.*?\204\200\222\200:\ +.*$/s){
FK> print "RUS DATA Ok!\n";
FK> }
FK> }
FK> ------------------
FK> Программа выдает оба print'а на Solaris SPARC (без русского языка),
FK> но на Red Hat 7.1 (c русским языком) второго print'а (RUS DATA)
FK> я не получаю.
FK> Кто-нибудь может подсказать,
FK> с чего бы это?
А покажи вывод od -x от той строки. HА ЭТОЙ МАШИHЕ, а не на своей рабочей
винде.
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
