Select Code to Download

    my($sym) = gensym;
...

    (open($sym, $cmd) or die "Cannot open pipe from `$cmd': $!")
      and bless $sym => $class;

my $content =
    ($resp->content_encoding || '') 
...
          : $resp->content;
  $resp->content_type =~ m!^multipart/!
    ? join("\n", $resp->headers_as_string, $content) : $content;