in reply to Win32 Font List

I'm surprised there isn't an API call for that. But it looks like (On Windows 2000, anyway) you can check the registry under HKLM\Software\Microsoft\Windows NT\CurrentVersion\Fonts ...

s^^unp(;75N=&9I<V@`ack(u,^;s|\(.+\`|"$`$'\"$&\"\)"|ee;/m.+h/&&print$&

Replies are listed 'Best First'.
Re^2: Win32 Font List
by slloyd (Hermit) on Sep 20, 2004 at 15:05 UTC
    I finally found an API call EnumFonts but it looks pretty hairy to set up. Anyone ever used this API that could help me write the perl code to call it? 
    #Just a guess...
$EnumFonts = new Win32::API("gdi32.lib","EnumFonts", [N,L,L,L],N);

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom