Re: GB2312 Encoding and File Names

Through some help of the PerlMonks board I have decoded the file name corre=
ctly; but when you dump it does not match the physical file name as it is s=
tored within the file system ie.

MIME Header : =3D?gb2312?B?RFBNMjAwN2V4Y2hhbmdl64rgXcVj4F3P5NDej80uemlw?=
=3D
Decoded     : DPM2007exchange=E9=9B=BB=E9=83=B5=E8=88=87=E9=83=B5=E7=AE=B1=
=E4=BF=AE=E5=BE=A9.zip
$VAR1 =3D "DPM2007exchange\x{96fb}\x{90f5}\x{8207}\x{90f5}\x{7bb1}\x{4fee}\=
x{5fa9}.zip";

so when one tries to compare to what is read from a directory listing you c=
annot match them together :( How do I get the decoded name to be as it is m=
eant to be; as show above.
-- 
Thanks, Phil

----- Original Message -----
> Just a follow up for some help on this problem. I appear to be able
> to decode Simplified Chinese okay but Tradional Chinese is somewhat
> more difficult.  I have the file name MIME entity:
> 
> =3D?gb2312?B?MzYw0MLOxbzgsuItMTItMDEtQ2hpIFNpbXAudHh0?=3D
> 
> which should decode to:
> 
> DPM2007exchange=E9=9B=BB=E9=83=B5=E8=88=87=E9=83=B5=E7=AE=B1=E4=BF=AE=E5=
=BE=A9.zip
> 
> but when I try and decode that name in Perl it comes out as:
> 
> DPM2007exchange=EF=BF=BD=EF=BF=BD=EF=BF=BD]=EF=BF=BDc=EF=BF=BD]=E7=AE=B1=
=E4=BF=AE=EF=BF=BD=EF=BF=BD.zip
> 
> I have installed the Encode::HanExtra module but even with that it is
> still not showing correctly. Am I missing some other type of module
> ?
> --
> Thanks, Phil
> 
> ----- Original Message -----
> > Hello all,
> >
> > I do hope I am in the right place for some help! I am working on a
> > project that requires email attachments to be extracted to the file
> > system. All was working great until one of our kind testers tried
> > with normal and simplified Chinese; where I ended up with files of
> > the name ?????.txt.
> >
> > Am using the module MIME::Parser to extract the files and after
> > some
> > great help from the developer I have realized that one need to
> > override a method in MIME::Parser::Filer so that the correct file
> > names are generated.
> >
> > One of the attachments in the test email is show below:
> >
> > 360=E6=96=B0=E9=97=BB=E7=9B=91=E6=B5=8B-12-01-Chi Simp.txt
> >
> > I have tried to use MIME::EncWords and MIME::Charset to extract the
> > correct name from the MIME entity using:
> >
> > my $fname =3D decode_mimewords($head->recommended_filename);
> >
> > but this still does not work :( so I tried to compare what the file
> > name looks like with the LANG with/and without UTF8
> >
> > With LANG en_GB.UTF8
> >
> > 360=E6=96=B0=E9=97=BB=E7=9B=91=E6=B5=8B-12-01-Chi Simp.txt
> >
> > With LANG en_GB
> >
> > 360=EF=BF=BD?=EF=BF=BD=EF=BF=BD?=EF=BF=BD=EF=BF=BD??=EF=BF=BD=EF=BF=BD?=
-12-01-Chi Simp.txt
> >
> > Now this is what happens when I extract the file with my new
> > method:
> >
> > With LANG en_GB
> >
> > 360=EF=BF=BD=EF=BF=BD=EF=BF=BD=C5=BC=EF=BF=BD=EF=BF=BD=EF=BF=BD-12-01-C=
hi Simp.txt
> >
> > With LANG en_GB.UTF8
> >
> > 360???=C5=BC???-12-01-Chi Simp.txt
> >
> > The MIME file name appears as
> > ?gb2312?B?MzYw0MLChLFPnHktMTItMDEtQ2hpIFRyYWQudHh0?=3D
> >
> > This is not may area of expertise so reaching out to you for some
> > help. How can one extract the file name from an email and have it
> > reflect its really Chinese name ?  Hope this make sense!
> > --
> > Thanks, Phil
> >
>