ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Dmitry E. Oboukhov                   2:5020/830.100 22 Mar 2007  14:54:37
 To : All
 Subject : бага или фича?
 -------------------------------------------------------------------------------- 
 

 dwork:[/home/dimka]$ cat test.pl
 #!/usr/bin/perl
 
 use warnings;
 use strict;
 
 my $file_name='tmp/test.test';
 my $file;
 
 open $file, '+<', $file_name
   or open $file, '+>', $file_name;
 my $data=<$file>;
 $data or $data=0;
 
 truncate $file, 0;
 print $file $data+1;
 dwork:[/home/dimka]$ perl test.pl
 dwork:[/home/dimka]$ od -t x1 tmp/test.test
 0000000 31
 
 dwork:[/home/dimka]$ perl test.pl
 dwork:[/home/dimka]$ od -t x1 tmp/test.test
 0000000 00 32
 это правильное поведение truncate? в доке ничего на эту тему нет, а я
 очень не ожидал такого честно говоря. приделал seek, заработало, а вот
 сабж?
 
 ... В Hью-Йорке мне делать нечего, хотя в качестве солдата может и побываю :)
 --- Mutt/1.5.13 (2006-08-11)
  * Origin: Debian GNU Linux (2:5020/830.100)
 
 

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

Тема:    Автор:    Дата:    бага или фича?   Dmitry E. Oboukhov   22 Mar 2007 14:54:37   бага или фича?   Serge Chervjakov   22 Mar 2007 19:46:13   Re: бага или фича?   Artem Chuprina   22 Mar 2007 20:18:26