Revision 439e45e4
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
SL/Template/Excel.pm | ||
---|---|---|
package SL::Template::Excel;
|
||
|
||
use SL::Template::Simple;
|
||
|
||
use vars qw(@ISA);
|
||
|
||
@ISA = qw(SL::Template::Simple);
|
||
use parent qw(SL::Template::Simple);
|
||
|
||
sub new {
|
||
my $type = shift;
|
SL/Template/HTML.pm | ||
---|---|---|
package SL::Template::HTML;
|
||
|
||
use SL::Template::LaTeX;
|
||
|
||
use vars qw(@ISA);
|
||
@ISA = qw(SL::Template::LaTeX);
|
||
use parent qw(SL::Template::LaTeX);
|
||
|
||
use strict;
|
||
|
SL/Template/LaTeX.pm | ||
---|---|---|
package SL::Template::LaTeX;
|
||
|
||
use vars qw(@ISA);
|
||
|
||
use SL::Template;
|
||
@ISA = qw(SL::Template::Simple);
|
||
use parent qw(SL::Template::Simple);
|
||
|
||
use strict;
|
||
|
SL/Template/OpenDocument.pm | ||
---|---|---|
package SL::Template::OpenDocument;
|
||
|
||
use SL::Template::Simple;
|
||
use parent qw(SL::Template::Simple);
|
||
|
||
use Archive::Zip;
|
||
use POSIX 'setsid';
|
||
use vars qw(@ISA);
|
||
|
||
use SL::Iconv;
|
||
|
||
... | ... | |
# use File::Temp qw(:mktemp);
|
||
use IO::File;
|
||
|
||
@ISA = qw(SL::Template::Simple);
|
||
|
||
use strict;
|
||
|
||
sub new {
|
SL/Template/PlainText.pm | ||
---|---|---|
package SL::Template::PlainText;
|
||
|
||
use SL::Template::LaTeX;
|
||
|
||
use vars qw(@ISA);
|
||
|
||
@ISA = qw(SL::Template::LaTeX);
|
||
use parent qw(SL::Template::LaTeX);
|
||
|
||
use strict;
|
||
|
SL/Template/XML.pm | ||
---|---|---|
package SL::Template::XML;
|
||
|
||
use SL::Template::HTML;
|
||
|
||
use vars qw(@ISA);
|
||
|
||
@ISA = qw(SL::Template::HTML);
|
||
use parent qw(SL::Template::HTML);
|
||
|
||
use strict;
|
||
|
Auch abrufbar als: Unified diff
DRY: "use parent"