#!/usr/bin/perl


use Data::Dumper ;
use ImageFont ;

$ImageFont::DEBUG = 1 ;

ImageFont::generate(
	skin => '/home/yneko/counter-medium-hand-black.skin',
	text => '1234567890',
) ;

$r = ImageFont::calc_size_min_max(
	skin => '/home/yneko/counter-medium-hand-black.skin',
	digits => 10,
	char_set => '0-9',
) ;
print Dumper( $r ) ;