NAME
    CAD::Format::DWG::AC1_50 - Read AutoCAD 1.50 DWG file.

SYNOPSIS
     use CAD::Format::DWG::AC1_50;

     my $dwg = CAD::Format::DWG::AC1_50->new;
     my $dwg = CAD::Format::DWG::AC1_50::from_file($dwg_file);
     my $blocks_ar = $dwg->blocks;
     my $entities = $dwg->entities;
     my $header = $dwg->header;
     my $layers_ar = $dwg->layers;
     my $linetypes_ar = $dwg->linetypes;
     my $styles_ar = $dwg->styles;
     my $views_ar = $dwg->views;
     my $block_entities = $dwg->block_entities;

DESCRIPTION
    In distribution is kaitai structure definition file dwg_ac1_50.ksy which
    described AutoCAD DWG format version AC1.50.

METHODS
  "new"
     my $dwg = CAD::Format::DWG::AC1_50->new;

    Constructor.

    Returns instance of object.

  "from_file"
     my $dwg = CAD::Format::DWG::AC1_50->from_file($dwg_file);

    Create instance of object from DWG file.

    Returns instance of object.

  "blocks"
     my $blocks_ar = $dwg->blocks;

    Get list of blocks in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::Block
    instances.

  "entities"
     my $entities_ar = $dwg->entities;

    Get list of entities in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::Entity
    instances.

  "header"
     my $header = $dwg->header;

    Get header of DWG file.

    Returns instance of CAD::Format::DWG::AC1_50::Header object.

  "layers"
     my $layers_ar = $dwg->layers;

    Get list of layers in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::Layer
    instances.

  "linetypes"
     my $linetypes_ar = $dwg->linetypes;

    Get list of line types in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::Linetype
    instances.

  "styles"
     my $styles_ar = $dwg->styles;

    Get list of styles in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::Style
    instances.

  "views"
     my $views_ar = $dwg->views;

    Get list of views in DWG file.

    Returns reference to array with CAD::Format::DWG::AC1_50::View
    instances.

  "block_entities"
     my $block_entities = $dwg->block_entities;

    Get list of block entitites.

    Returns CAD::Format::DWG::AC1_50::RealEntities instance

DEPENDENCIES
    IO::KaitaiStruct.

REPOSITORY
    <https://github.com/michal-josef-spacek/CAD-Format-DWG-AC1_50.git>

AUTHOR
    Michal Josef Špaček <mailto:skim@cpan.org>

    <http://skim.cz>

LICENSE AND COPYRIGHT
    © 2021-2023 Michal Josef Špaček

    BSD 2-Clause License

VERSION
    0.01