Question: How to get variables shared between child and parent process while using fork in perl