---
name: "MAB2::Parser::Disk"
section: "3pm"
platform: "linux"
package: "libcatmandu-mab2-perl"
version: "0.24-2"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/MAB2::Parser::Disk"
---

# MAB2::Parser::Disk(3pm)

MAB2 Diskette format parser

## NAME

MAB2::Parser::Disk - MAB2 Diskette format parser

## SYNOPSIS

MAB2::Parser::Disk is a parser for MAB2 Diskette records.

MAB2::Parser::Disk expects UTF-8 encoded files as input. Otherwise  provide a filehande with a specified I/O layer.

```
    use MAB2::Parser::Disk;
    my $parser = MAB2::Parser::Disk->new( $filename );
    while ( my $record_hash = $parser->next() ) {
        # do something
    }
```

## Arguments

- "file"

  Path to file with MAB2 Diskette records.

- "fh"

  Open filehandle for file with MAB2 Diskette records.

## METHODS

### new($filename \| $filehandle)

### next()

Reads the next record from MAB2 input stream. Returns a Perl hash.

### \_decode($record)

Deserialize a raw MAB2 record to an ARRAY of ARRAYs.

## SEE ALSO

Catmandu::Importer::MAB2.

## AUTHOR

Johann Rolschewski \<jorol@cpan.org\>

## COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Johann Rolschewski.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.