Discussion :

[refre]

Bonjour à tous,
je suis en train d'essayer de faire communiquer perl et openssl. Pour cela j'effectue des appels à openssl depuis mon script perl de la manière suivante :

Code :

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

1
2
3
4
5
6
7
8
 
my $bits = shift;
my $passphrase = shift;
my $privFile = "tmpPriv.key";
my $randFile = "random-bits";
 
$commande = "openssl genrsa -des3 -out $privFile -passout pass:$passphrase -rand $randFile $bits";
`$commande`;

Ce petit bout de script lance la commande : openssl genrsa -des3 -out tmpPriv.key -passout pass:pwd -rand random-bits 1024

Et c'est là que tout part en cachuète ! J'ai beau passer l'option pass:motdepasse openssl me redemande à chaque fois de saisir une pass phrase... alors que si j'effectue cette même commande directement dans un terminal il ne me demande plus de passphrase.... donc je n'y comprends rien et je galère...

Quelqu'un aurait-il une solution ?

Merci d'avance.

[lami20j]

Salut,

En général on utilise les apostrophes inverses pour capturer une sortie.

Code :

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

1
2
my $date = `date`;
print "Nous sommes le : $date\n";

Utilise la fonction system plutôt.

lami20j

[Jedai]

Essaie de faire un "print $commande;" pour vérifier.

--
Jedaï

[refre]

Re-bonsoir, merci pour vos réponses mais j'avais oublié de le précisé dans mon post d'origine, j'ai déjà testé avec system (même résultat) et la sortie de print $commande est conforme à ce que je désire obtenir... d'ailleurs quand je copie/colle le résultat de print $commande et que je le lance la commande fonctionne correctement...

[lami20j]

Re,

Veux-tu afficher la syntaxe de ton essai avec system ? Merci.

lami20j

[Jedai]

Bizarre... Très bizarre.... Essaie avec un system à plusieurs arguments, ça évite de passer par le shell, peut-être y a-t-il un problème à ce niveau là.

--
Jedaï

[refre]

Re,

Veux-tu afficher la syntaxe de ton essai avec system ? Merci.

lami20j

j'ai tout simplement fait un system($commande);
au lieu du `$commande`

franchement sur ce problème je sèche, en plus il n'y a que cette option (-passout) qui ne passe pas, le reste semble fonctionner...

[Mr6]

Code :

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

my $passphrase = shift;

tu appelles ton script en lui passant ta passphrase en param ? je suppose que c'est le dernier param que tu lui passes ? il n'y aurait pas un retour chariot qui traine ?