https through proxy with libwww

[Evgeny Stepanov]

hello libwww@perl.org !

I need to access https pages and work with forms there. I tried like
that:

use strict;
use LWP::UserAgent;

  my $ua = LWP::UserAgent->new;
  $ua->agent('Mozilla/5.0');
  $ua->proxy(['https', 'http', 'ftp'] => 'http://my.proxy.addr:3128');
  my $req = HTTP::Request->new(GET => 'https://some.secured.host/');
  my $res = $ua->request($req);
  if ($res->is_success) {
      print $res->as_string;
  }
  else {
      print "Failed: ", $res->status_line, "\n";
  }

but it gives me
Failed: 501 Not Implemented
This piece of code works just fine without proxy defined, but i need
proxy. As far as i understood, https through proxy is not implemented
yet. Maybe you guys know another way to get it working with https
through proxy?

--- 
best regards
Evgeny Stepanov