Onderwerp: perl scripten

Ben al een paar dagen aan het stoeien met perl maar het wil niet echt lukken

#!/usr/bin/perl -w
$hd = system ("du -d depth -h /usr/jails/webserver/");
print "$hd \n";


srv1# ./check.pl
1.7G /usr/jails/webserver/
0



het probleem is dat ik niet weet hoe ik percies die output van du -d depth -h /usr/jails/webserver/ naar de variable $hs zetwant zoals jullie hier boven zien heeft die $hd een waarde van 0 plaats dan 1.7G /usr/jails/webserver/

en om het dan helemaal lastig te maken wil ik ook nog alleen maar die 1.7G in de $hd dus die dit niet.


en dan ben ik ook nog opzoek hoe ik de date in een variable zet en daar dan dingen uit filter bv alleen de tijd dag of maand of meerdere.

os dat ik draai is freebsd.


Alvast bedankt voor jullie antwoorden.

Probeer eens

#!/usr/bin/perl -w
my $hd = system ("du -d depth -h /usr/jails/webserver/");
print "$hd \n";

dus my voor de variabele

Origineel geplaatst door Beyonder
Probeer eens

#!/usr/bin/perl -w
my $hd = system ("du -d depth -h /usr/jails/webserver/");
print "$hd \n";

dus my voor de variabele

Code:

#!/usr/bin/perl -w
use strict;

my $hd = `du -d depth -h /usr/local/apache/virtual | awk {'print \$1'}`;
print STDOUT $hd;

Origineel geplaatst door dignus

Code:

#!/usr/bin/perl -w
use strict;

my $hd = `du -d depth -h /usr/local/apache/virtual | awk {'print \$1'}`;
print STDOUT $hd;

Deze werkt die er boven met die my ervoor wilde niet dan was hij ook 0

use strict;

my $hd = `du -d depth -h /usr/jails/webserver/ | awk {'print \$1'}`;
print STDOUT $hd;

Nu nog ff die date tot zover al bedankt heb 3 avonden zitten proberen en op google lopen zoeken naar een oplossing