logo
Free, unlimited AI code reviews that run on commit
git-lrc git-lrc GitHub Install Now We'd appreciate a star git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt

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

Description

       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 <http://perldoc.perl.org/functions/pack.html> for the formatting of the pattern.

       Please refer to the documentation for AnyData.pm and DBD::AnyData.pm for further details.

Name

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

Synopsis

        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

        OR

        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

See Also