Bonjour,

Je pense que ma question peut être bête.
J'ai une commande qui fonctionne pour récupérer le pourcentage d'utilisation d'un de mes dossiers:

/# df /var | tail -n 1 | awk '{sub (/%/, "", $5); print $5 };

Cette commande me retourne: 17

Maintenant, j'aimerais savoir comment la faire passer dans un fichier de script en perl.
J'ai essayé:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
use strict;
use warnings;
 
my $valeur = `df /var | tail -n 1 | awk'{sub(/%/, "", $5); print $5}`;
print $valeur
Ensuite, j'ai essayé:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
my $valeur = `df /var | tail -n 1 | awk'{sub(/%/, "", \$5); print \$5}`;
print $valeur
Mais ceci n'affiche aucun résultat.

Une personne aurait-elle une petite idée?

Je vous en remercie.