Dud “Font” family name in Pango::Cairo::FontMap (Mac OS X), causes crash
I was trying to enumerate font families and faces using a very simple Perl script; I get a crash on Mac OS X (Ventura 13.1 (22C65), Intel hardware; Pango 1.50.12 installed with Homebrew).
Crashy Perl script
use strict;
use Cairo;
use Pango;
use v5.18;
my $fontmap = Pango::Cairo::FontMap -> new();
foreach my $family ($fontmap->list_families()) {
say "Starting " . $family->get_name();
# next if ($family->get_name() eq "Font");
foreach my $face ($family->list_faces()) {
say $family->get_name() . " " . $face->get_face_name();
}
say "Done for " . $family->get_name();
}
Uncommenting the line that reads
# next if ($family->get_name() eq "Font");
fixes the crash.