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

##</code><code>##

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