Всем привет! У меня такая проблема.  Есть dbf файл (Rst_0.dbf), я к нему обращаюсь напрямую из перла, дата в этом файле в формате 7.11.2008, при выполние вот этого кода:

use DBD::Xbase;
my $xbase_dbh = DBI->connect("DBI:XBase:.", undef, undef, {RaiseError =>1});
my $sel = "select RESULTDATE from Rst_0.dbf";
my $sel_csr = $xbase_dbh->prepare($sel);
$sel_csr->execute();
while (my ($dt) = $sel_csr->fetchrow_array()) {
    print " $dt\n";
    print "<br>";
}

 дата выдается как 200811, т.е. выдается год и месяц, а день отсекается. Предполагаю, что нужно здесь использовать преобразование формата как для MySQL:
my $sel = "select DATE_FORMAT(RESULTDATE,'%d.%m.%y %H:%i') from Rst_0.dbf"; 
но не прокатывает! Может кто нибудь сможет помочь? 

Может, недостающая информация в следующих элементах массива?

Поигрался с датой, пришел к такому выводу: Если в dbf файле дата до 10 числа, т.е. 01.11.2008 .......09.11.2008, то в результате выполнения данного скрипта выводится дата как 200811. А если дата в файле 10.11.2008 или 11.11.2008 и т.д. то выводится корректно: 20081110. Следственно баг в самом модуле XBase, либо у меня руки кривые   Какие мысли будут уважаемые? Можно ли обойти эту проблему? 

tapio, у вас база не очень большая? может выложите, а я у себя бы проверил. просто под рукой нет dbf баз

shamber
файл на 5 мегабайт.

Присоединённый файл ( Кол-во скачиваний: 4 )
 Rst_1.zip 101,94 Kb

посмотрите в структуре создается запись
   0TKGRP INCOMING OFFICE TRAFFIC           200811 701:30:00
тогда как для 
  0TKGRP INCOMING OFFICE TRAFFIC           2008111007:30:00  
вместо нуля пустое место. 
Из-за этого проблемы

Спасибо! Начинает ситуация прояснятся. А вы как просматриваете этот dbf файл? 
Просто я в Access его открываю, там дата отражается как 07.11.2008.

tapio, а я человек простой   я блокнот использую(AkelPad) 
пробовал тупо заменить регуляркой $_ =~ s/(\d{6})\s(\d)/$1$num$2/g; где $num =0

но файл на 1 байт получается больше, не могу понять почему

Моя мысль копия твоей, тоже пытаюсь регуляркой заменить, но пока безрезультатно :( 

shamber

 Так в файл 0 добавляем, вот и получается. Или я гоню?

Гонишь. потому что заменяется пробел на 0

200811 9 -> 200081109

Все разобрался
Я забыл что файл не текстовый, а бинарный 
Я ваш файл обработал этим скриптом, а после этого у меня совершенно спокойно появилось число 20081107 


Это сообщение отредактировал(а) shamber - 28.1.2009, 22:13

shamber
Спасибо тебе огромное! Очень помог мне! 
Я решил без временного файла делать, а перезаписывать этот.

Всегда пожалуйста 

ЗЫ отмечайте вопрос как решенный 

Это сообщение отредактировал(а) shamber - 29.1.2009, 21:47