lib/Org/Element/TableVLine.pm

   1 package Org::Element::TableVLine;
   2
   3 use 5.010;
   4 use locale;
   5 use Moo;
   6 extends 'Org::Element';
   7
   8 our $VERSION = '0.23'; # VERSION
   9
  10 sub as_string {
  11     my ($self) = @_;
  12     return $self->_str if $self->_str;
  13     "|---\n";
  14 }
  15
  16 1;
  17 #ABSTRACT: Represent Org table vertical line
  18
  19
  20 __END__
  21 =pod
  22
  23 =head1 NAME
  24
  25 Org::Element::TableVLine - Represent Org table vertical line
  26
  27 =head1 VERSION
  28
  29 version 0.23
  30
  31 =head1 DESCRIPTION
  32
  33 Derived from L<Org::Element>.
  34
  35 =head1 ATTRIBUTES
  36
  37 =head1 METHODS
  38
  39 =for Pod::Coverage as_string
  40
  41 =head1 AUTHOR
  42
  43 Steven Haryanto <stevenharyanto@gmail.com>
  44
  45 =head1 COPYRIGHT AND LICENSE
  46
  47 This software is copyright (c) 2012 by Steven Haryanto.
  48
  49 This is free software; you can redistribute it and/or modify it under
  50 the same terms as the Perl 5 programming language system itself.
  51
  52 =cut
  53