ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     12 Jun 2003  11:53:40
 To : "Michael Spector"
 Subject : Re: template
 -------------------------------------------------------------------------------- 
 

 Хмутро.
 
  RA>> Бочку пива|колы тебе Gennadij !
 
  RA>>  Однажды 29 Apr 03 14:18, Gennadij Pastuhov писал Renat Araslanow:
 
  GP>>>>> open(FILE, "<file");
  RA>>>> my $text;
  RA>>>> {
  RA>>>>     undef $/;
  RA>>>>     $text = <FILE>;
  RA>>>> }
 
  GP>>> За это спасибо.
 
  RA>> я опечатался local undef $/;
 
 MS> #!/usr/bin/perl -w
 
 MS>  open(FILE, "/etc/passwd");
 
 MS>  my $text1;
 MS> {
 MS>         local undef $/;
 MS>         $text1 = <FILE>;
 MS> } 
 
 MS> seek(FILE, 0, SEEK_SET);
 MS> my $text2 = <FILE>;
 
 MS> close(FILE);
 MS> print "Text1:\n$text1\n\nText2:\n$text2\n";
 
 MS> А у меня в обоих текстах выдаёт по целому файлу ...
 MS> Получается, что local не помогает, а надо потом возвращать $/ = "\n" ?
 
 Hадо local $/ = undef;
 
 -- 
 Artem Chuprina
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    template   Gennadij Pastuhov   28 Apr 2003 09:38:16   Re: template   Konstantin Tokar   29 Apr 2003 03:29:45   template   Renat Araslanow   29 Apr 2003 06:04:19   template   Gennadij Pastuhov   29 Apr 2003 14:18:04   Re: template   Konstantin Tokar   30 Apr 2003 01:26:29   Re: template   Artem Chuprina   30 Apr 2003 15:40:11   template   Renat Araslanow   30 Apr 2003 23:08:10   template   Michael Spector   11 Jun 2003 19:52:20   template   Michael Spector   11 Jun 2003 20:34:51   Re: template   Artem Chuprina   12 Jun 2003 11:53:40   Re: template   Jahor Miadzviedziew   29 Apr 2003 16:35:12   template   Alexander Lunkov   29 Apr 2003 17:28:09