Costume::Doublet is a Perl extension for to make a base pattern for an Elizabethan doublet.
Costume::Doublet::make_pattern(chest => 46,
waist => 40,
back_length => 23,
shoulder => 6.75,
front_width => 15.75,
back_width => 17,
unit => "inch",
name => "Zach Kessin",
output => "pattern.png");
This module takes a set of measurements and will output a pattern for
a man's doublet. The measurements are taken from "The costume technician's handbook"
The measurements needed are around the
around the waist,
The length of the back from neck to waist
the length of the shoulder from base of the neck to the top of the shoulder (its very easy to make this too long
the width of the front (taken at the midpoint of the arm joint, about where a tank top would stop)
The width of the back ibid.
Unit should be "inch" or "cm"
name is the name of the person for whom the pattern is for.
output is a filename to output.
Sewing notes the pattern does not include seam allowance.
Making a mock up out of cheap fabric is recomeneded.
For a more authentic garment ajustment of seam placement may be needed.
The sleave cap (shown in green) should be a curve. That will i hope
be in a future version of the software.