my $response = $ua->post('http://il-sxd/abs',$request);

##</code><code>##

sub AUTOLOAD {
    my ($this,$val) = @_;
    my $program   = $AUTOLOAD;
    if ($program =~ /::DESTROY$/){
        return;
    }
    $program =~ /ContextObject::Generic::(.*)/;
    my $attribute = $1;

    my $key=$this->is_attribute($attribute);