/usr/share/perl5/Excel/Template/Container/Shadow.pm is in libexcel-template-perl 0.34-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | package Excel::Template::Container::Shadow;
use strict;
BEGIN {
use vars qw(@ISA);
@ISA = qw( Excel::Template::Container::Format );
use Excel::Template::Container::Format;
}
sub new
{
my $class = shift;
my $self = $class->SUPER::new(@_);
$self->{FONT_SHADOW} = 1;
return $self;
}
1;
__END__
=head1 NAME
Excel::Template::Container::Shadow - Excel::Template::Container::Shadow
=head1 PURPOSE
To format all children in shadow
=head1 NODE NAME
SHADOW
=head1 INHERITANCE
Excel::Template::Container::Format
=head1 ATTRIBUTES
None
=head1 CHILDREN
None
=head1 EFFECTS
None
=head1 DEPENDENCIES
None
=head1 USAGE
<shadow>
... Children here
</shadow>
In the above example, the children will be displayed (if they are displaying
elements) in a shadow format. All other formatting will remain the same and the
"shadow"-ness will end at the end tag.
=head1 AUTHOR
Rob Kinyon (rob.kinyon@gmail.com)
=head1 SEE ALSO
FORMAT
=cut
|