d/l the code, save in a file, and run... sorry for the big line of DATA

#!perl -w
use strict;
use vars qw/$n/;

$_ = 
join 'e',       split 'm',
join '"',       split 'j',
join 's',       split 'z',
join 'n',       split 'f',
join ' ',       split 'x',
join '',map{chr}split'00', 
join '', 
map{$_ eq '000'?'0 00':$_} 
map{$n++ % 2?'0' x $_ :$_} 
                split '0',
<DATA>;#        split '1',
eval and die;

__END__
1120201140201010502010102020116020120301010602074020117020122020116020
+120306502010102020111020116020101040201010902011402012030803010109020
+114020101080201203072020970209902010107020101090201140201203087020101
+04020111020120301010602059
[download]