#!/usr/bin/perl -w
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$ua->agent("Mozilla 8.0");

use HTTP::Request::Common qw(POST);
my $req = (POST 'https://www.i.ph/signup.php',
     [ "username" => "nonsense",
     "usermail" => 'myemail@yahoo.com',
     "userpassword1" => "password",
     "userpassword2" => "password",
     "usermobile" => "639165263265",
     "userchallenge" => "test test",
     "useranswer" => "test",
     "agreement" => 1
     ]);
$request = $ua->request($req);
$content = $request->content;
print $content;
exit;