comment executer mon script perl

bonjour voici mon script perl

Citation:

---

#!/usr/bin/perl
print "Content-type: text/html\n\n";
`quota | tail -n1` =~ / +(\d+) +(\d+) +(\d+)/;
my $used_Ko = sprintf "%d", $1;
my $used_Mo = sprintf "%.2f", ($1)/1024; my $total_Ko = sprintf "%.0f", $3;
my $total_Mo = sprintf "%d", ($3)/1024; my $remain_Ko = sprintf "%.0f", $total_Ko - $used_Ko;
my $remain_Mo = sprintf "%.2f", ($total_Ko - $used_Ko)/1024; my $pc = sprintf "%.2f", ($1/$3)*100; print " \n";
print "\n";
print "Etat de votre espace disque\n";
print "";
print " Espace total disponible :$total_Mo Mo\n";
print " Espace utilisé : $used_Ko Ko ($used_Mo Mo) ($pc%)\n";
print " Espace restant : $remain_Ko Ko ($remain_Mo Mo)\n";
print "\n";
print "";

---

Mon soucis c'est que je ne sais pas comment l'executer. Deplus j'aimerais qu'il soit lisible sur une page html merci de m'aider les amis :king: