Discussion :

[barabath]

Bonjour à tous.

Malgré mes efforts, je n'ai pas trouvé d'information limpide sur ce que je recherche (probablement que ce que je cherche est un peu trop tordu)

Je code en PHP.
J'ai ponctuellement besoin de faire appel à un script PERL (langage que je ne maitrise pas) dans un de mes scripts.

J'aurais aimé savoir s'il était possible de récupérer des variables de PERL dans mon script PHP (et comment ?)

Après de nombreuses recherches, j'ai trouvé le moyen d'exécuter PERL depuis un programme PHP via la commande suivante :

Code :

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

1
2
3
4
 
<?php
exec("../bin/mon_perl.cgi");
?>

Le script PERL (mon_perl.cgi) quant à lui se présente ainsi :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
#!/usr/bin/perl
 
`quota | tail -n1` =~ / +(\d+) +(\d+) +(\d+)/;
 
my $used_Ko  = sprintf "%d", $1;
my $espace_utilise  = sprintf "%.2f", ($1)/1024;
 
my $total_Ko = sprintf "%.0f", $3;
my $espace_total = sprintf "%d", ($3)/1024;
 
my $remain_Ko = sprintf "%.0f", $total_Ko - $used_Ko;
my $remain_Mo = sprintf "%.2f", ($total_Ko - $used_Ko)/1024;
 
my $pourcentage_disque = sprintf "%.2f", ($1/$3)*100;

Ce code permet de connaitre les informations relatives à l'espace disque total/utilisé/restant sur mon serveur.

En PERL, les variables sont déclarées par

Code :

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

my $ma_variable

PHP est-il capable de récupérer la variable initialisée dans PERL ?

Merci de m'avoir prété attention jusqu'au bout (pour ceux qui lisent ces mots et qui ont la double compétence PHP/PERL)

Barabath

[mathieu]

dans le cas que tu montres, le plus simple est de lancer la commande "quota" en PHP et d'ensuite d'analyser la sortie pour calculer les valeurs

[barabath]

Merci pour ta suggestion Mathieu.

Je vais probablement suivre ton conseil.