Créer un utilisateur système
Bonjour,
Je suis débutante en Perl et je dispose d'un serveur Linux équipé d'Apache. Je souhaiterai à partir de pages web pouvoir créer des utilisateurs système sur mon serveur.
J'ai créé ce sript suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
#!/usr/bin/perl
use strict;
use CGI;
use DB_File;
print "Content-type: text/html\n\n";
print "<html><head><title>test</title></head>\n";
print "<body><center><h1>Test</h1></center>\n";
print "<br><br>";
my $cmd = "/home/vpopmail/bin/vadduser";
my $domi = "toto.fr";
my $mdp = "1234";
my $at = "@";
my $ad = "hihi";
my $nom = "$ad$at$domi";
system($cmd,$nom,$mdp);
print "</body></html>\n"; |
Lorsque que je l'exécute en ligne de commande avec putty cela me crée bien mon utilisateur mais lorsque que je veux l'exécuter sur une page web il ne me crée rien!!
Merci d'avance pour votre aide.
