Costume::Doublet - Perl extension for to make a base pattern for an Elizabethan doublet
use Costume::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 chest, 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.
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.
Necessary books are the "Costume Technician's Handbook" by Rosemary InghamLiz Covey as well as "Pattern's of fashion" and others
Zachary Kessin, <firstname.lastname@example.org>
Copyright (C) 2004 by Zachary Kessin
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.1 or, at your option, any later version of Perl 5 you may have available.
If you actually make stuff from the patterns I would love to see pictures!