I have written this preamble like "thinking aloud", and musing how harsh I can be to you. Well, I won't, no reason for that. But the formatting / indenting of your code is poor, and you don't include in your post all that is necessary for me (maybe others have more divining strength) to work out where the real problem might be.

What's in the files esoda.pl and eksoda.pl?

From your previous postings and the answers to these, it seems like you have not been directed to two essential nodes. Please read these nodes:

• How (Not) To Ask A Question
• I know what I mean. Why don't you?

Please skim at least the PerlMonks FAQ and the Tutorials Section. You will benefit greatly doing so, since you will (as I hope) get aware of the fact that the better you lay out the maps you can't read, the better we will be able to show you the road.

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}