• NAME
• SYNOPSIS
• BUGS
• AUTHOR
• LICENCE

NAME

File::Stata::DtaReader - read Stata 8 and Stata 10 .dta files

SYNOPSIS

open FILE, '<', 'test.dta';

my $dta = new File::Stata::DtaReader(*FILE);

print STDERR ``$dta->{nvar} vars; $dta->{nobs} obs\n'';

print join( ',', @{ $dta->{varlist} } ) . ``\n'';

while ( my @a = $dta->readRow ) { print join( ',', @a ) . ``\n''; }

BUGS

This is quick and dirty first version (November 2007).

All types of Stata missing values (determined somewhat approximately in the case of float and double) are rendered as a perl undef.

AUTHOR

Written by Franck Latremoliere. Copyright (c) 2007 Reckon LLP. See http://www.reckon.co.uk/staff/franck/ for more information.

LICENCE

You may use or redistribute this module under the same terms as perl itself (Artistic Licence or GNU GPL).