Scroll to navigation

AnyData::Format::Fixed(3pm) User Contributed Perl Documentation AnyData::Format::Fixed(3pm)


 AnyData::Format::Fixed - tiedhash & DBI/SQL access to Fixed length data


 use AnyData;
 my $table = adHash( 'Fixed', $filename,'r',{pattern=>'A20 A2'} );
 while (my $row = each %$table) {
     print $row->{name},"\n" if $row->{country} =~ /us|mx|ca/;
 # ... other tied hash operations
 use DBI
 my $dbh = DBI->connect('dbi:AnyData:');
 $dbh->func('table1','Fixed', $filename, {pattern=>'A20 A2'},'ad_catalog');
 my $hits = $dbh->selectall_arrayref( qq{
     SELECT name FROM table1 WHERE country = 'us'
 # ... other DBI/SQL operations


This is a parser for fixed length record files. You must specify an unpack pattern listing the widths of the fields e.g. {pattern=>'A3 A7 A20'}. You can either supply the column names or let the module get them for you from the first line of the file. In either case, they should be a comma separated string.

Refer to <> for the formatting of the pattern.

Please refer to the documentation for and for further details.


copyright 2000, Jeff Zucker <> all rights reserved

2022-06-05 perl v5.34.0