Help language development. Donate to The Perl Foundation
Font::AFM - Interface to Adobe Font Metrics files
use Font::AFM; my Font::AFM $h .= core-font: 'Helvetica'; my $copyright = $h.Notice; my $w = $h.Wx<aring>; $w = $h.stringwidth("Gisle", 10);
This module implements the Font::AFM class. Objects of this class are initialised from an AFM (Adobe Font Metrics) file and allow you to obtain information about the font and the metrics of the various glyphs in the font.
This module includes built-in metrics classes for the 14 PDF Core Fonts.
Metrics can also be loaded for local AFM files on your system.
All measurements in AFM files are given in terms of units equal to 1/1000 of the scale factor of the font being used. To compute actual sizes in a document, these amounts should be multiplied by (scale factor of font)/1000.
This module includes built-in classes for the 14 PDF Core Fonts. For example:
use Font::Metrics::helvetica; my $bbox = Font::Metrics::helvetica.FontBBox;
The list of PDF Core Fonts is:
method core-font( Str $font-name ) returns Font::AFM:D
Loads a named PDF core font
$font-name is one of
Zapfdingbats (case insensitive).
AFM font metrics loader.
:$name may be the absolute path of a font. Otherwise the font is loaded from the directory specified by the
METRICS environment variable (see ENVIRONMENT below). Croaks if the font can not be found.
The name of the font as presented to the PostScript language
findfont operator, for instance "Times-Roman".
Unique, human-readable name for an individual font, for instance "Times Roman".
Human-readable name for a group of fonts that are stylistic variants of a single design. All fonts that are members of such a group should have exactly the same
FamilyName. Example of a family name is "Times".
Human-readable name for the weight, or "boldness", attribute of a font. Examples are
Angle in degrees counterclockwise from the vertical of the dominant vertical strokes of the font.
true, the font is a fixed-pitch (monospaced) font.
An array of integers giving the lower-left x, lower-left y, upper-right x, and upper-right y of the font bounding box. The font bounding box is the smallest rectangle enclosing the shape that would result if all the characters of the font were placed with their origins coincident, and then painted.
A two dimensional hash containing from and to glyphs and kerning widths.
Recommended distance from the baseline for positioning underline strokes. This number is the y coordinate of the center of the stroke.
Recommended stroke width for underlining.
Version number of the font.
Trademark or copyright notice, if applicable.
Comments found in the AFM file.
The name of the standard encoding scheme for the font. Most Adobe fonts use the
AdobeStandardEncoding. Special fonts might state
Usually the y-value of the top of the capital H.
Typically the y-value of the top of the lowercase x.
Typically the y-value of the top of the lowercase d.
Typically the y-value of the bottom of the lowercase p.
Returns a hash table that maps from glyph names to the width of that glyph.
Returns a hash table that maps from glyph names to bounding box information. The bounding box consist of four numbers: llx, lly, urx, ury.
Returns the width of the string passed as argument. The string is assumed to contains only characters from
%glyphs A second argument can be used to scale the width according to the font size.
Kern the string. Returns an array of string segments, separated by numeric kerning distances, and the overall width of the string.
:%glyphs - an optional mapping of characters to glyph-names.
Font::FreeType - To obtain metrics (and more) for many other font formats , including
HarfBuzz - Also has some ability to obtain metrics for
method metrics-class( Str $font-name ) returns Font::AFM:U
autoloads the appropriate delegate for the named font. A subclass of Font::AFM
The AFM specification can be found at:
Contains the path to search for AFM-files. Format is as for the PATH environment variable. The default path built into this library is:
Composite character and Ligature data are not parsed.
Copyright 1995-1998 Gisle Aas. All rights reserved.
Ported from Perl to Raku by David Warring Copyright 2015
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.