The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Business::DPD::Render::PDFReuse::SlimA6 - render a label in slim A6 using PDF::Reuse

SYNOPSIS

    use Business::DPD::Render::PDFReuse::SlimA6;
    my $renderer = Business::DPD::Render::PDFReuse::SlimA6->new( $dpd, {
        outdir => '/path/to/output/dir/',    
        originator => ['some','lines','of text'],
    });
    my $path = $renderer->render( $label );

DESCRIPTION

Render a DPD label using a slim A6-based template that also fits on a A4-divided-by-three-page. This is what we need at the moment. If you want to provide other formats, please go ahead and either release them as a standalone dist on CPAN or contact me to include your design.

METHODS

Public Methods

_multiline

    $renderer->_multiline(
        ['some','lines of','text'],
        {
            fontsize => 6,
            base_x   => 35,
            base_y   => 120,
            rotate   => 270,   # or 0
            align    =>
        },
    )

Render several lines of text using a some very crappy placing "algorithm". Patches welcome!

Note: Input is expected to be utf8 and will be encoded as latin1 until someone can show me how to stuff utf8 into PDF::Reuse.

inc2pdf

    my $pdf_template = $class->inc2pdf(__PACKAGE__);

Returns the path to the PDF template with the same name as the implementing class (the PDF templates are installed alongside their class).

AUTHOR

Thomas Klausner <domm {at} cpan.org> RevDev <we {at} revdev.at>

SEE ALSO

PDF::Reuse

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.