1 package Org::Element::FixedWidthSection;
6 extends 'Org::Element';
8 our $VERSION = '0.23'; # VERSION
12 my $res = $self->_str;
13 $res =~ s/^[ \t]*: ?//mg;
18 # ABSTRACT: Represent Org fixed-width section
25 Org::Element::FixedWidthSection - Represent Org fixed-width section
33 use Org::Element::FixedWidthSection;
34 my $el = Org::Element::FixedWidthSection->new(_str => ": line1\n: line2\n");
38 Fixed width section is a block of text where each line is prefixed by colon +
39 space (or just a colon + space or a colon). Example:
42 : some example from a text file.
45 : fourth line, after the empty above.
47 which is functionally equivalent to:
51 some example from a text file.
54 fourth line, after the empty above.
57 Derived from L<Org::Element>.
63 =head2 $el->text => STR
65 The text (without colon prefix).
67 =for Pod::Coverage as_string BUILD
71 Steven Haryanto <stevenharyanto@gmail.com>
73 =head1 COPYRIGHT AND LICENSE
75 This software is copyright (c) 2012 by Steven Haryanto.
77 This is free software; you can redistribute it and/or modify it under
78 the same terms as the Perl 5 programming language system itself.