What you show is C++ or a closely related language. It is not Perl. Even if you had asked a coherent question with comprehensive context, PerlMonks is not the appropriate support forum for you. You could try posting an updated version of your question on StackOverflow. Take note of the rel=plies you received here before you post elsewhere however. Taking time to improve your question as suggested is likely to help a lot with getting useful programming help.

Update: Sorry, I didn't read your question closely enough the first time through and thought you were asking a question about the code itself. So, what everyone else has said: show us what you have tried and how it went wrong. If you have tried nothing we can't help you fix it.