if ($resp->is_success)
        {
                my $location_id= $resp->header( 'Location' );
                #my $str = print "Received reply: $message\n";
                # print "$message\n";
                $location_id=~ /.*\/(\d+)$/;
                my $location_id= $1 || '';
                print "$location_id\n";
        }