how to convet unicode to big5 chinese char in perl

Hi
I got the unicode of the chinese char, like \x{4E2D}or 中 and I
world like to  print in dos. But I find in chinese dos I only can use
the big5 code to print out the chinese char. Like print "\x{A4}\x{A4}"
how can I encode the 4e2d to a4a4, I try to use encode(big5 $string) but
it not work.

Anyone can help pls

Thx

Benny