lib/Org/Element/Target.pm

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