菜单问题

菜单问题
[color=0000ff]my $menubar = $main->Frame(-relief => 'raised', -borderwidth => 2)->pack(-side => 'top',>fill => 'x');
my $menufile = $menubar->Menubutton(-text => 'File', -underline => 0, -tearoff => 0) -> pack(-side => 'left');
my $menuopts = $menubar->Menubutton(-text => 'Options', -underline => 0, -tearoff => 0) -> pack(-side => 'left');
my $menuhelp = $menubar->Menubutton(-text => 'Help', -underline => 0, -tearoff => 0) -> pack(-side => 'left');[/color]
[color=red]可以运行,但报了堆错误:[/color]
@ 535 not utf8
SV = PV(0x2c1da40) at 0x2c75e38
REFCNT = 2
FLAGS = (POK,pPOK,UTF8)
PV = 0x2c7b294 "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
SV = PVMG(0x2c79ce4) at 0x2c75e38
REFCNT = 2
FLAGS = (SMG,POK,pPOK,UTF8)
IV = 0
NV = 0
PV = 0x2c7b294 "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
MAGIC = 0x2c7c43c
MG_VIRTUAL = &PL_vtbl_utf8
MG_TYPE = PERL_MAGIC_utf8(w)
MG_LEN = 4
@ 535 not utf8
SV = PV(0x2c86198) at 0x2c83538
REFCNT = 2
FLAGS = (POK,pPOK,UTF8)
PV = 0x2c8757c "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
SV = PVMG(0x2c7a144) at 0x2c83538
REFCNT = 2
FLAGS = (SMG,POK,pPOK,UTF8)
IV = 0
NV = 0
PV = 0x2c8757c "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
MAGIC = 0x2c8770c
MG_VIRTUAL = &PL_vtbl_utf8
MG_TYPE = PERL_MAGIC_utf8(w)
MG_LEN = 4
@ 535 not utf8
SV = PV(0x2c8648c) at 0x2c8a8a0
REFCNT = 2
FLAGS = (POK,pPOK,UTF8)
PV = 0x2c8a814 "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
SV = PVMG(0x2c7a804) at 0x2c8a8a0
REFCNT = 2
FLAGS = (SMG,POK,pPOK,UTF8)
IV = 0
NV = 0
PV = 0x2c8a814 "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
MAGIC = 0x2c8e954
MG_VIRTUAL = &PL_vtbl_utf8
MG_TYPE = PERL_MAGIC_utf8(w)
MG_LEN = 4
@ 535 not utf8
SV = PV(0x2c863c0) at 0x2c90ba4
REFCNT = 2
FLAGS = (POK,pPOK,UTF8)
PV = 0x2c8defc "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
SV = PVMG(0x2c7a8c4) at 0x2c90ba4
REFCNT = 2
FLAGS = (SMG,POK,pPOK,UTF8)
IV = 0
NV = 0
PV = 0x2c8defc "\313\316\314\345 9"\0Malformed UTF-8 character (unexpected non-continuation byte 0xce, immediately after start byte 0xcb) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
Malformed UTF-8 character (unexpected non-continuation byte 0xe5, immediately after start byte 0xcc) in subroutine entry at C:/Perl/site/lib/Tk/Widget.pm line 190.
[UTF8 "\x{0}\x{0} 9"]
CUR = 6
LEN = 7
MAGIC = 0x2c929f4
MG_VIRTUAL = &PL_vtbl_utf8
MG_TYPE = PERL_MAGIC_utf8(w)
MG_LEN = 4

[color=red]怎么办?[/color]