zydronium/imapsync
1
0
Fork 0
mirror of https://github.com/imapsync/imapsync.git synced 2025-07-30 22:06:07 +02:00
Code Issues Projects Releases Packages Wiki Activity

1.508

Browse source
This commit is contained in:
Nick Bebout 2012-09-11 20:50:53 -05:00
parent c08a56e486
commit 1e03db551f
58 changed files with 790 additions and 435 deletions
Download patch file Download diff file Expand all files Collapse all files

13
W/learn/imap_utf7 Executable file
View file

@ -0,0 +1,13 @@
#!/usr/bin/perl
use Unicode::IMAPUtf7;
my $t = Unicode::IMAPUtf7->new();
while (<>) {
chomp ;
push( @result, sprintf( "%33s %s\n", $_, $t->decode($_) ) ) ;
}
print @result ;