Discussion :

[synx91]

Bonjour,

J'ai fait un script en perl qui utilise le module XML::Twig.

Lorsque je l'exécute, voilà l'erreur qu'il me retourne:
not well-formed (invalid token) at line 1, column 1, byte 1 at /usr/lib64/perl5/vendor_perl/5.8.8/x86_64-linux-thread-multi/XML/Parser.pm line 187

Quelqu'un connait?

Merci

[djibril]

Cela veut dire que ton fichier XML est non valide.

[synx91]

J'ai eu du mal à trouver pourquoi mon fichier était non valide car ça marchait avant de faire un ftp.

Donc, depuis que je télécharge mon fichier depuis un serveur ftp windows, le fichier est modifié.

Je m'explique: quand je déplace le fichier de windows à linux avec WinSCP, il n'y a pas de problème. Mais quand je le récupère avec une connexion ftp via mon script perl et le module Net::FTP ça ne marche plus pour cette raison: le fichier a été modifié.

Voici ma fonction ftp:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
sub ftp {
	my $user = $OPTION{'user'};
	my $password = $OPTION{'password'};
 
	$ftp = Net::FTP->new("$OPTION{'address'}", Debug => 0)
		or die "Cannot connect to $OPTION{'address'}: $@";
	$ftp->login($user,$password)
		or die "Cannot login ", $ftp->message;
	$ftp->cwd("$OPTION{'directory'}")
		or die "Cannot change working directory ", $ftp->message;
	$ftp->get("$OPTION{'file'}")
		or die "get failed ", $ftp->message;
	$ftp->quit;
}

Savez vous d'où cela peut venir?

[djibril]

Après ton login, rajoute :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$ftp->binary;

[synx91]

Ca ne change rien.

J'ai aussi essayé avec $ftp->ascii;

[djibril]

Regarde si l'encodage du fichier est le même. Mais c'est étrange ton histoire quand même.