I'll just assume you meant to post this under Reading data from a document.txt. You seperate your attributes with a space, and then try to get them back from the file splitting on a pipe character. Also you print all entries on the same line.

Try something like:

tr/|/ / for ($nam,$srn,$sex,$age);  # remove | characters
print LOG "$nam|$srn|$sex|$age\n";  # print seperated by |
[download]

In your POSTIT.PL

And please, please, please, read How (Not) To Ask A Question or people might get upset with you.

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.
[download]