/ 
PostScript-MailLabels-2.21
River stage zero No dependents
/ PostScript::MailLabels::BasicData

old definitions replaced by more complete ones. Overlapping defs are sometimes the same, sometimes slightly different. Probably a guage of my ability to measure tiny distances. %{$self->{AVERY}} = ( '5267' => ['Letter', [qw/8167 8667/], 'return address', 80, undef, undef, undef, undef, undef, undef, ], '5160' => ['Letter', [qw/5160 8160 8250 8460 8560 8660/], 'address', 30, 9, 36, 189, 72, 11.5, 0, ], '5161' => ['Letter', [qw/8161/], 'address', 20, undef, undef, undef, undef, undef, undef, ], '5162' => ['Letter', [qw/8162 8252 8462 8662/], 'address', 14, undef, undef, undef, undef, undef, undef, ], '5163' => ['Letter', [qw/8163 8253 8463 8663/], 'shipping', 10, undef, undef, undef, undef, undef, undef, ], '5164' => ['Letter', [qw/8164 8254/], 'shipping', 6, undef, undef, undef, undef, undef, undef, ], '5165' => ['Letter', [qw/8165 8255 8665/], 'full sheet', 1, 0, 0, 612, 792, 0, 0, ], '5167' => ['Letter', [qw/8167 8257 8667/], 'full sheet', 80, 18, 36, 126, 18, 22.5, 0.36, ], '5266' => ['Letter', [qw/8066 8166 8366/], 'file folder', 30, undef, undef, undef, undef, undef, undef, ], '6490' => ['Letter', [qw/8096/], '3 1/2 inch diskette, non-wrap', 15, undef, undef, undef, undef, undef, undef, ], '5196' => ['Letter', [qw/8196/], '3 1/2 inch diskette, wrap', 9, 9, 36, 198, 216, 0, 0, ], '5395' => ['Letter', [qw/8395/], 'name badge', 8, undef, undef, undef, undef, undef, undef, ], );

NAME

PostScript::MailLabels::BasicData - Basic data that is used by the MailLabels module.

SYNOPSIS

Loads up a few basic data items :

Font metrics

PS code for generating a calibration page

PS code for generating a test page

PS code for PostNET font

Standard paper sizes

Specs for Avery (tm) forms (incomplete)

DESCRIPTION

All this does is initialize a bunch of data items. Not intended to be
used by normal people. It just makes the MailLabel.pm code more
compact. The documentation is probably not too complete.

Note that the font metrics camne from PostScript::Metrics by Shawn Wallace.
The PostNET barcode font came from James H. Cloos, Jr.

EXAMPLE

  require PostScript::MailLabels::BasicData;

  $data = new PostScript::MailLabels::BasicData;

	$code = '8460';
  @layout = @{$data{AVERY}{$code}};

 # layout=>[paper-size,[list of product codes], description,
 #          number per sheet, left-offset, top-offset, width, height]
 #			distances measured in points

 $testpage = $data{TESTPAGE};

REVISION HISTORY

Version 1.20 - August 2005
Added patch from Jonathan Kamens
Version 1.10 - August 2004
Added 5167 Avery stock
Version 1.02 - January 2001
Fixed calibration axis labels to work for arbitrary paper size
Added y_gap to Avery data
Version 1.01 - December 2000
Added pagesize parameter to handle paper other than Letter.
Added more axis labels so that A4 calibration plot would work.

AUTHOR

Alan Jackson
October 1999
alan@ajackson.org

SEE ALSO