sub changewebpass{

my $url = shift;
my $postdata = shift;
my $res = $ua->request(POST $url, $postdata);

if ($res->is_success){
return 'success';
}else{
return 'failed';
}

}