Skip Menu |
 

This queue is for tickets about the Encode CPAN distribution.

Report information
The Basics
Id: 4602
Status: resolved
Priority: 0/
Queue: Encode

People
Owner: DANKOGAI [...] cpan.org
Requestors: matt [...] sergeant.org
Cc:
AdminCc:

Bug Information
Severity: Critical
Broken in: 1.98
Fixed in: (no value)

Attachments


Subject: Encode hangs with PerlIO decoding the attached file
Download (untitled) / with headers
text/plain 350b
The attached file is decoded from a spam, and declares itself as iso-2022-jp. When I try the following: perl -e 'open(my $fh, "./split/100T_1X_PM3_EMQ_MT__message.txt") || die $!; binmode($fh, ":encoding(iso-2022-jp)") || die $!; while (<$fh>) { print }' It just hangs there, using 100% CPU. This is on perl 5.8.1 that ships with Mac OS X Panther.
<‘—MŽÒ> DM-Master “Œ‹ž“s¢“c’J‹æ‹î‘ò1-2-27 Îì@“O 090-8159-3461 <Ž–‹ÆŽÒ> ƒlƒbƒgƒ`ƒƒƒ“ƒlƒ‹ .”zM’âŽ~‚Ì•û‚Í‚±‚¿‚ç‚܂Ł@master1@yume.otegami.com .¦”zM’âŽ~Žè‘±‚«‚©‚ç–ñ48ŽžŠÔˆÈ“à‚Å”½‰f‚³‚ê‚Ü‚·B .ƒ[ƒ‹ƒNƒŠ[ƒjƒ“ƒO‹@Ší‚̌̏á‚É‚æ‚萔‰ñ‚à”zM’âŽ~‚̐l‚É .‘—‚Á‚Ä‚¢‚é‰Â”\«‚ª‚ ‚è‚Ü‚µ‚½B½‚ɐ\‚µ–ó‚ ‚è‚Ü‚¹‚ñ‚Å‚µ‚½B .‚»‚̂悤‚È•û‚ÍŒ–¼‚Ɂu›‰ñ–ځv‚Ɖñ”‚ð‹L“ü‚µ‚ďã‹LƒAƒhƒŒƒX‚É‘—‚Á‚Ä‚­‚¾‚³‚¢B .‚»‚êˆÈŠO‚Ì•û‚ÍŒ–¼‚É”zM’âŽ~‚Æ‹L“ü‚µ‚ďã‹LƒAƒhƒŒƒX‚É‘—‚Á‚Ä‚­‚¾‚³‚¢B .II¦•K‚¸”zM’âŽ~‚̃AƒhƒŒƒX‚©‚炨‘—‚è‚­‚¾‚³‚¢II . . .*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c* .ƒTƒCƒg‚ªÁ‚¦‚Ä‚µ‚Ü‚¤‹°‚ꂪ‚ ‚è‚Ü‚·‚̂ŁA‚¨‘‚ß‚ÉŒ©‚É—ˆ‚ĉº‚³‚¢‚ˁô .*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c* . .@@@@@@@@@@ÝŒÉŒÀ‚èI”„‚èØ‚êŠÔ‹ßII .ž\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ž .b@@@@@ ââ@http://net-channel.info/@áá .ž\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ž . .¡ ¡\\\\\\\\\\\\\\\\\\\\\\\\\\ . ¡ .¡@@@\‘òŽR‚Ì‚¨‹q—l‚̐º‚É‚¨“š‚¦‚µ‚Ä...\ .@@@@@@@@@‚‚¢‚ɍŐV”Å‚¨•ó‰f‘œW‚ª“oêII . .@@@@@@@@‚¨‹q—l‚ÌŠú‘҂𗠐؂è‚Ü‚¹‚ñ . .\\\\\\\\\\\\\\\\\\\\\\\\\\¡ ¡ . .@ƒ}„«ƒj„«ƒA„«‚É„«‚Í„« .@„ª„®„ª„®„ª„®„ª„®„ª„® .@‚½„«‚Ü„«‚ç„«‚È„«‚¢„«‰f„«‘œ„«‚΄«‚©„«‚è„«‚Ì„«Ž©„«M„«ì„« .@„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„®„ª„® . .@@@@Šú‘Ò’Ê‚è‚Ì1–‡‚Å‚·B“ÆŽ©‚É‹ÆŠE— “üŽèŽ©M‚ ‚èB . .I___N___D___E___X__________________________________________ . .‚PDƒAƒCƒhƒ‹‚¨•ó‰f‘œ . .‚QD‘fl‚¨•ó‰f‘œ . .‚RD“ŽB‚¨•ó‰f‘œ . .‚SDƒŒƒCƒv‚¨•ó‰f‘œ . .‚TD‚»‚Ì‘¼@ÃŽ~‰æ‘œ‚È‚Ç . .@@@@@@@@@@@@@@@@@@@@2980‰~‚æ‚è .___________________________________________________________ . .„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª . .@@@@@@“ŽB‚à“–‘R‚â‚点‚È‚µ‚Ì–{•¨AŒƒƒ„ƒo‚Å‚·B . .@@@@@@@@‚Ç‚ê‚àŒµ‘I‚ÉŒµ‘I‚ðd‚Ë‚½Ž©MìB . .„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª„ª . .@@@@@@@@@@ÝŒÉŒÀ‚èI”„‚èØ‚êŠÔ‹ßII .ž\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ž .b@@@@@ ââ@http://net-channel.info/@áá .ž\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ž . .*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c* .ƒTƒCƒg‚ªÁ‚¦‚Ä‚µ‚Ü‚¤‹°‚ꂪ‚ ‚è‚Ü‚·‚̂ŁA‚¨‘‚ß‚ÉŒ©‚É—ˆ‚ĉº‚³‚¢‚ˁô .*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*c*
Download (untitled) / with headers
text/plain 695b
Show quoted text
> The attached file is decoded from a spam, and declares itself as > iso-2022-jp. When I try the following: > > perl -e 'open(my $fh, "./split/100T_1X_PM3_EMQ_MT__message.txt") || die $!;
binmode($fh, ":encoding(iso-2022-jp)") || die $!; while (<$fh>) { print }' Show quoted text
> > It just hangs there, using 100% CPU. > > This is on perl 5.8.1 that ships with Mac OS X Panther.
I simply could not reproduce your problem on /usr/bin/perl of MacOS X v10.3.2 or any other combination of platforms and perl builds. I pretty much doubt if it is Encode's problem but if you want me to work on it further, I need reports in depth including * what uname -a says * what "perl -V" says Dan the Encode Maitainer


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.