File Coverage

blib/lib/SQL/Entity/Column/LOB.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 23 23 100.0


line stmt bran cond sub pod time code
1             package SQL::Entity::Column::LOB;
2              
3 6     6   1304 use strict;
  6         13  
  6         248  
4 6     6   34 use warnings;
  6         13  
  6         337  
5 6     6   32 use vars qw(@EXPORT_OK %EXPORT_TAGS $VERSION);
  6         35  
  6         520  
6              
7             $VERSION = '0.02';
8              
9 6     6   32 use Abstract::Meta::Class ':all';
  6         20  
  6         972  
10 6     6   171 use base qw(Exporter SQL::Entity::Column);
  6         13  
  6         4060  
11              
12             @EXPORT_OK = qw(sql_lob);
13             %EXPORT_TAGS = (all => \@EXPORT_OK);
14              
15             =head1 NAME
16              
17             SQL::Entity::Column::LOB - Entity LOBs column abstraction.
18              
19             =head1 CLASS HIERARCHY
20              
21             SQL::Entity::Column
22             |
23             +----SQL::Entity::Column::LOB
24              
25             =head1 SYNOPSIS
26              
27             use SQL::Entity::Column::LOB ':all';
28              
29             my $column = SQL::Entity::Column::Lob->new(name => 'name', size_column => 'doc_size');
30             or
31             my $column = sql_lob(name => 'name', size_column => 'doc_size');
32              
33             =head1 DESCRIPTION
34              
35             Represents entities lob column, that maps to the table lob column and column that stores lob size.
36              
37             =head2 EXPORT
38              
39             None by default.
40              
41             sql_column by tag 'all'
42              
43             =head2 ATTRIBUTES
44              
45             =over
46              
47             =item size_column
48              
49             Column that stores information about lob size
50              
51             =cut
52              
53             has '$.size_column';
54              
55             =back
56              
57             =head2 METHODS
58              
59             =over
60              
61             =item sql_lob
62              
63             =cut
64              
65             sub sql_lob {
66 2     2 1 623 __PACKAGE__->new(@_);
67             }
68              
69              
70             1;
71              
72             __END__