Revision c6bc1816
Von Sven Schöling vor etwa 9 Jahren hinzugefügt
modules/override/YAML/Loader/Base.pm | ||
---|---|---|
1 | 1 |
package YAML::Loader::Base; |
2 |
use strict; use warnings; |
|
3 |
use YAML::Base; use base 'YAML::Base'; |
|
4 | 2 |
|
5 |
field load_code => 0; |
|
6 |
|
|
7 |
field stream => ''; |
|
8 |
field document => 0; |
|
9 |
field line => 0; |
|
10 |
field documents => []; |
|
11 |
field lines => []; |
|
12 |
field eos => 0; |
|
13 |
field done => 0; |
|
14 |
field anchor2node => {}; |
|
15 |
field level => 0; |
|
16 |
field offset => []; |
|
17 |
field preface => ''; |
|
18 |
field content => ''; |
|
19 |
field indent => 0; |
|
20 |
field major_version => 0; |
|
21 |
field minor_version => 0; |
|
22 |
field inline => ''; |
|
3 |
use YAML::Mo; |
|
4 |
|
|
5 |
has load_code => default => sub {0}; |
|
6 |
has stream => default => sub {''}; |
|
7 |
has document => default => sub {0}; |
|
8 |
has line => default => sub {0}; |
|
9 |
has documents => default => sub {[]}; |
|
10 |
has lines => default => sub {[]}; |
|
11 |
has eos => default => sub {0}; |
|
12 |
has done => default => sub {0}; |
|
13 |
has anchor2node => default => sub {{}}; |
|
14 |
has level => default => sub {0}; |
|
15 |
has offset => default => sub {[]}; |
|
16 |
has preface => default => sub {''}; |
|
17 |
has content => default => sub {''}; |
|
18 |
has indent => default => sub {0}; |
|
19 |
has major_version => default => sub {0}; |
|
20 |
has minor_version => default => sub {0}; |
|
21 |
has inline => default => sub {''}; |
|
23 | 22 |
|
24 | 23 |
sub set_global_options { |
25 | 24 |
my $self = shift; |
... | ... | |
32 | 31 |
} |
33 | 32 |
|
34 | 33 |
1; |
35 |
|
|
36 |
__END__ |
|
37 |
|
|
38 |
=head1 NAME |
|
39 |
|
|
40 |
YAML::Loader::Base - Base class for YAML Loader classes |
|
41 |
|
|
42 |
=head1 SYNOPSIS |
|
43 |
|
|
44 |
package YAML::Loader::Something; |
|
45 |
use YAML::Loader::Base -base; |
|
46 |
|
|
47 |
=head1 DESCRIPTION |
|
48 |
|
|
49 |
YAML::Loader::Base is a base class for creating YAML loader classes. |
|
50 |
|
|
51 |
=head1 AUTHOR |
|
52 |
|
|
53 |
Ingy döt Net <ingy@cpan.org> |
|
54 |
|
|
55 |
=head1 COPYRIGHT |
|
56 |
|
|
57 |
Copyright (c) 2006. Ingy döt Net. All rights reserved. |
|
58 |
|
|
59 |
This program is free software; you can redistribute it and/or modify it |
|
60 |
under the same terms as Perl itself. |
|
61 |
|
|
62 |
See L<http://www.perl.com/perl/misc/Artistic.html> |
|
63 |
|
|
64 |
=cut |
Auch abrufbar als: Unified diff
YAML: Versionsupdate