use Perl

  my $blogger = Net::Blogger->new(engine=>"slash",debug=>1);

  $blogger->Username(2785);
  $blogger->Password("******");
  $blogger->Proxy("http://use.perl.org/journal.pl");
  $blogger->Uri("http://use.perl.org/Slash/Journal/SOAP");

  my $post = "Net::Blogger::Engine::Slash::slashcode\nhello world, part two";
  my $pid = $blogger->newPost(postbody=>\$post);

  my $post = $blogger->getPost(postid=>$pid);
  my $body = $post->{'content'} ."\nquack quack quack";

  $blogger->editPost(
             postid   => $pid,
             postbody => $body,
            );

  # Why is this going to call blogger.deletePost ?!?!
  # What have I done to anger the symbol table...

  $blogger->deletePost(postid=>$pid);