Bonjour à tous,

je veux connaitre l'espace libre de mes DDs
mais j'ai une erreur du genre " cannot use df on this machine ...", pourtant le module est bien installé et j'ai un PC tout ce qu'il y a de normal

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl
use strict;
use warnings;
use Filesys::DiskSpace;
my $df_free;
my $dir = "C://";
my ($fs_type, $fs_desc, $used, $avail, $fused, $favail) = df $dir;
my $df_libre = (($avail) / ($avail+$used)) * 100.0;
my $out = sprintf("espace libre $dir == %0.2f\n",$df_free);
print $out;
une idée ?