G'day vinumanikandan,

"none of the code worked" is completely unhelpful! Were there error messages or other output? Please read these guidelines: How do I post a question effectively?

Using strict and warnings will often help you to track down problems. I would recommend that you get into the habit of using these always (unless you have a very good reason not to).

One line where I see an obvious problem (missing quote):

my $req = HTTP::Request->new(POST => http://test.com/servlet/sync?');
[download]