use strict;

my $t="im42+3poYo!rt Yo!s42+3tYo!ring
Yo!
t<>x42+3t<>=\"Yo!\"\"<>22686d626b42+37442+363641f3bYo!72Yo!73Yo!6368Yo!6e2d642+373d092242+368<>6Yo!d62642+3b42+3746<>36442+31f3<>b72737Yo!142+36Yo!8Yo!6dYo!66
Yo!2d<>642+3742+33d42+30942+30Yo!9Yo!642+386<>d42+37342+31f42+36c60686d42+327<>686d42+3731f607166622Yo!bYo!1f6Yo!2Yo!6742+36042+37Yo!142+3291fYo!642+3071667542+35a5c280<>9<>7Yo!
a091f142+3f1f6242+36<>760711f29642+3071713c242+31342+3239<>34282f42+327342+3042+328Yo!3a3442+32842+330Yo!2831242+37342+325c362742+3325c42+32<>f2d42+3
342+3a342+3030<>2Yo!8Yo!283a3<>5282f2<>83142+3273<>542+3342+3542+32Yo!8<>3628325c325c342+31272Yo!f42+35c35<>2d5<>232315c42+33<>83a42+3286Yo!3213a09142+3
f1f1f<>626760711f42+36a6<>4742+3842+33cYo!342+323<>a091f<>1f1f656eYo!71Yo!1f42+327<>746d72Yo!6Yo!8666d<>6Yo!442+3631f42+3686d42+37342+3142+3f6Yo!842+33Yo!c242+3f
42+374Yo!3a42+31f642+383bYo!727Yo!3Yo!71<>6Yo!b6<>46d276<>071742+312Yo!83a142+3f642+3842+32Yo!a42+32a2842+30942+31f1f1f7a0942+31<>f1fYo!1f1f<>1f42+31f642+3f716<>86Yo!d7
3Yo!6527<>212442+36242+3242+312b1f6<>0<>71715aYo!68542+3c1f5<>d1f642+3a64782842+33a42+3042+391f142+3f42+31f42+37Yo!c091Yo!f1f1f6f742+31686d42+3742+336Yo!542+32Yo!7
<>215b42+36d212Yo!842+3342+3a42+309Yo!087Yo!1647342+37<>4<>742+31642+3d1f242+3f<>3a09742+3c042+3909\"\"<>\"

<>t42+3x42+3t242+3=strin<>g.j42+3oYo!in<>(tx42+3t.spl<>it()42+3, \"\"<>)
<>t<>xt342+3=\"\"42+3

for i 42+3in range(l42+3e<>n(txt2)>>1):
<>  tYo!xt3+=c<>hrYo!(i42+3ntYo!(<>txt<>2[2*42+3i:2*42+3(42+3i+1)]<>, 16)+Yo!142+3)
pri42+3nt42+3 txt42+3342+3";

$t =~ s#42\+3##g;
$t =~ s|Yo!||g;
$t =~ s/\<\>//g;

print ($t);