package AReport;
use common::sense;
use PDF::API2;
use Exporter qw( import );
use constant mm => 25.4 / 72;
use constant in => 1 / 72;
use constant pt => 1;
our @EXPORT = qw(mm in pt);

use Class::Tiny qw(api x y pageW pageH bodyW bodyH);
<etc...>

##</code><code>##

use AReport;

my $pdf = AReport->new( file => 'junk.pdf', pageW => 8.5/in );