File Coverage

blib/lib/Image/TextMode/Format/ATASCII.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             package Image::TextMode::Format::ATASCII;
2              
3 1     1   1102 use Moo;
  1         12182  
  1         5  
4              
5             extends 'Image::TextMode::Format', 'Image::TextMode::Canvas';
6              
7 1     1   1622 use Image::TextMode::Font::Atari;
  1         3  
  1         63  
8             has '+font' => ( default => sub { Image::TextMode::Font::Atari->new } );
9              
10 1     1   440 use Image::TextMode::Palette::Atari;
  1         2  
  1         83  
11             has '+palette' => ( default => sub { Image::TextMode::Palette::Atari->new } );
12              
13 0     0 1   sub extensions { return 'ata' }
14              
15             =head1 NAME
16              
17             Image::TextMode::Format::ATASCII - read ATASCII files
18              
19             =head1 DESCRIPTION
20              
21             ATASCII is a variant of ASCII used in Atari 8-bit home computers.
22              
23             =head1 METHODS
24              
25             =head2 new( %args )
26              
27             Creates a ATASCII instance.
28              
29             =head2 extensions( )
30              
31             Returns 'ata'.
32              
33             =head1 AUTHOR
34              
35             Brian Cassidy Ebricas@cpan.orgE
36              
37             =head1 COPYRIGHT AND LICENSE
38              
39             Copyright 2008-2015 by Brian Cassidy
40              
41             This library is free software; you can redistribute it and/or modify
42             it under the same terms as Perl itself.
43              
44             =cut
45              
46             1;