Accès à un sharepoint en utilisant Perl et webdav

Question

une question similaire a été posée à question 494120, mais à mon humble avis n'a pas vraiment répondu ...

Je veux télécharger des fichiers vers un sharepoint en utilisant Perl/WebDAV (à partir d'un hôte Win32). Pour cela, je dois m'authentifier avec KERBEROS sur le serveur. Après avoir fait des recherches sur Google pendant des heures et essayé différentes approches, je ne suis pas en mesure d'ouvrir une connexion. Code actuel est le suivant:

my $agent = HTTP::DAV::UserAgent->new(keep_alive=>1); 
$agent->agent('Agent'); 
$agent->timeout(1000); 
my $d = HTTP::DAV->new(-useragent => $agent); 
$d->credentials(-user=>$user,-pass =>$pass, -url =>$url); 
$d->open(-url=>$url) or die("Couldn't open $url: " .$d->message . "\n"); 

Quand vous faites le $ d-> ouvert (...), je reçois toujours "Impossible d'ouvrir $ url:. non autorisée Negotiate". Donc, évidemment, l'authentification de base ne fonctionne pas.

Quelqu'un pourrait-il me diriger vers le bon chemin, s'il vous plaît? Je ne suis pas fixé à l'aide de WebDAV, tout autre mécanisme me conviendrait aussi bien. Je veux juste le faire fonctionner ...

---

Edit 1
Lorsque vous utilisez LWP avec Authen::NTLM (comme suggéré par Madhur) ne fonctionne pas non plus. Il en résulte un 500 internal server error sur IIS ainsi que sur Apache. Puisque la même erreur se produit sur deux serveurs Web différents (avec deux implémentations NTLM différentes), je suppose qu'il doit y avoir un problème dans le module Authen::NTLM.

Looking at the implementation de Authen::NTLM il me semble que le code est inverse un peu conçu et mis en œuvre ni basée sur un cahier des charges, ni est-il vraiment configurable. Ce qui pose la question pourquoi the specification n'a pas été utilisé pour implémenter le module ...

Utilise NTLM avec Perl tel un cas d'utilisation exotique?

---

Edit 2
Basé sur la suggestion de Madhur, j'ai essayé d'accéder au Sharepoint avec Curl. Cela marche. Mais renifler les messages NTLM de Curl et ceux envoyés par Perl me montre que le format du message est en quelque sorte différent.

Answer 1

Au lieu d'utiliser WebDAV. Je vous suggère d'utiliser des services Web hors de la boîte.

Cela donne aperçu sur la façon d'utiliser les services web sharepoint PERL:

http://www.squish.net/log/2008/10/11/perl-sharepoint/

http://shareperl.blogspot.com/

Et voici le code .NET pour télécharger le fichier en utilisant le service Web: http://www.oriolardevol.com/Article/Details/3

La conversion en code PERL vous est laissée comme il y a plusieurs années depuis que j'ai utilisé PERL :)