🚀 go-pugleaf

Akira wrote:
> 
> Does anyone have a script that will take a dbase IV file and convert it to a
> comma delimited file using Perl 5??
> 
> Any comments or suggestions would be welcomed.
> 
> Thanx in advance
> 
> Akira
Dear Akira,

try xbase.pm 1.0.7 which is available on the CPAN sites.

It reads dBase files and you get the contents of a record as a field.
This can be printed using the join function:

rough Example:
####################
push (@INC,'C:\\midosa');   #adjust it to your environment
require Xbase;

$dbf_name = '6.dbf';
$database = new Xbase; 

$database->open_dbf($dbf_name);

print $database->dbf_type; 	# debug output

$database->dbf_stat; 		# debug output

$database->go_top;

while (1){
 
   @fields = $database->get_record;

   print "@fields\n";  # unformatted test output
  
   $database->go_next;
   if ($database->eof) {
      last;
   }
}
####################

Greetings from Bonn
Marcus

-- 
#################################################################
# Marcus Blaha  startext Unternehmensberatung GmbH
#               Kennedyallee 2 / 53175 Bonn
# Tel.:         +49.228.95996-16        Fax.: +49.228.95996-66
# Compuserve    101317,3140             eMail  mbl@startext.de
# WWW           http://www.startext.de
#################################################################