用gd画图的时候怎样显示汉字？

CODE:

#!/usr/bin/perl
use GD;
use GD::Graph::linespoints;
print "Content-type: image/png\n\n";
my @data = ( [qw(一月 二月 三月 四月 五月 六月 七月 八月 九月)],
             [undef, 52,53,54,55,56,undef,58,59],
             [60, 61,61,undef,68,66,65,61,undef],
);

my $chart = GD::Graph::linespoints->;new(700,500);
$chart->;set_x_label_font("/apile/AVBKV.TTF",10);
$chart->;set_y_label_font("/apile/AVBKV.TTF",10);
$chart->;set_x_axis_font("/apile/AVBKV.TTF",10);
$chart->;set_y_axis_font("/apile/AVBKV.TTF",10);
$chart->;set_title_font("/apile/AVBKV.TTF",16);
$chart->;set(
   x_label       =>; '月份',
   y_label       =>; '# 賣出',
   title         =>; '前三季, 2000',
   y_long_ticks  =>; 1,
   markers       =>; [1,5],
   marker_size   =>; 8,
   line_types    =>; [4,1],
   line_width    =>; 3,
);
$chart->;set_legend('outlet 1', 'outlet 2');
my $gd_object = $chart->;plot(\@data);


#make sure we are writing to a binary stream
binmode STDOUT;
# Convert the image to PNG and print it on standard output
print $gd_object->;png;