Bonjour à tous,
je débute sur ce langage et j'aimerais savoir comment faire pour q
je souhaite créer automatiquement une trentaine se comptes utilisateur.
Pour cela toutes les informations des uilisateurs sont saisies dant un
fichier je je vais parcourrir.
Mon problème est le suivant: Comment faire pour que le programme rentre
deux fois le mot de passe lors de l'utilisation de la commande
"password $login" sachant que je dispose de la variable $password comme
mot de passe.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
DominiX
ici même:JP WILLIAM a écrit
Bonjour à tous, je débute sur ce langage et j'aimerais savoir comment faire pour q je souhaite créer automatiquement une trentaine se comptes utilisateur. Pour cela toutes les informations des uilisateurs sont saisies dant un fichier je je vais parcourrir. Mon problème est le suivant: Comment faire pour que le programme rentre deux fois le mot de passe lors de l'utilisation de la commande "password $login" sachant que je dispose de la variable $password comme mot de passe.
Merci d'avance
(echo $password; echo $password) | passwd $user
-- dominix
ici même:JP WILLIAM <jp.william@wanadoo.fr> a écrit
Bonjour à tous,
je débute sur ce langage et j'aimerais savoir comment faire pour q
je souhaite créer automatiquement une trentaine se comptes
utilisateur. Pour cela toutes les informations des uilisateurs sont
saisies dant un fichier je je vais parcourrir.
Mon problème est le suivant: Comment faire pour que le programme
rentre deux fois le mot de passe lors de l'utilisation de la commande
"password $login" sachant que je dispose de la variable $password
comme mot de passe.
Bonjour à tous, je débute sur ce langage et j'aimerais savoir comment faire pour q je souhaite créer automatiquement une trentaine se comptes utilisateur. Pour cela toutes les informations des uilisateurs sont saisies dant un fichier je je vais parcourrir. Mon problème est le suivant: Comment faire pour que le programme rentre deux fois le mot de passe lors de l'utilisation de la commande "password $login" sachant que je dispose de la variable $password comme mot de passe.
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent Wacrenier wrote:
DominiX <dominix@despamed.com> écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style
print "$password n $password n ......./usr/bin/passwd";
Quelqu'un peut-il me corriger cette ligne de commande ?
Suis-je dans la bonne voie ?
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
DominiX
ici même:Laurent Wacrenier <lwa@ teaser . fr> a écrit
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
oui, tu as raison, j'ai pris cet exemple (de memoire) d'un script qui en fait evoquait saslpassword...
-- dominix
ici même:Laurent Wacrenier <lwa@ teaser . fr> a écrit
DominiX <dominix@despamed.com> écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
oui, tu as raison, j'ai pris cet exemple (de memoire)
d'un script qui en fait evoquait saslpassword...
ici même:Laurent Wacrenier <lwa@ teaser . fr> a écrit
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
oui, tu as raison, j'ai pris cet exemple (de memoire) d'un script qui en fait evoquait saslpassword...
-- dominix
DominiX
ici même:JP WILLIAM a écrit
Laurent Wacrenier wrote:
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
ici même:JP WILLIAM <jp.william@wanadoo.fr> a écrit
Laurent Wacrenier wrote:
DominiX <dominix@despamed.com> écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style
print "$password n $password n ......./usr/bin/passwd";
Quelqu'un peut-il me corriger cette ligne de commande ?
Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty,
avec perl ca irait mieux d'utiliser Expect.pm
genre ca mais attention a la locale. non testé.
use Expect;
my $expobj = Expect->spawn("/bin/passwd", $user);
die "problem $!n" unless (defined $expobj);
$expobj->log_stdout(0);
$expobj->expect(10,"New password: ");
print $expobj "$passwdr";
$expobj->expect(10, "Re-enter new password: ");
print $expobj "$passwdr";
$pobj->expect(10, "successfully changed") or die "password change failed";
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
JP WILLIAM
J'essaye ce script et je vous tiens au courant. @+ "DominiX" a écrit dans le message de news: 41e4e869$0$29430$
ici même:JP WILLIAM a écrit
Laurent Wacrenier wrote:
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
J'essaye ce script et je vous tiens au courant.
@+
"DominiX" <dominix@despamed.com> a écrit dans le message de news:
41e4e869$0$29430$626a14ce@news.free.fr...
ici même:JP WILLIAM <jp.william@wanadoo.fr> a écrit
Laurent Wacrenier wrote:
DominiX <dominix@despamed.com> écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style
print "$password n $password n ......./usr/bin/passwd";
Quelqu'un peut-il me corriger cette ligne de commande ?
Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty,
avec perl ca irait mieux d'utiliser Expect.pm
genre ca mais attention a la locale. non testé.
use Expect;
my $expobj = Expect->spawn("/bin/passwd", $user);
die "problem $!n" unless (defined $expobj);
$expobj->log_stdout(0);
$expobj->expect(10,"New password: ");
print $expobj "$passwdr";
$expobj->expect(10, "Re-enter new password: ");
print $expobj "$passwdr";
$pobj->expect(10, "successfully changed") or die "password change failed";
J'essaye ce script et je vous tiens au courant. @+ "DominiX" a écrit dans le message de news: 41e4e869$0$29430$
ici même:JP WILLIAM a écrit
Laurent Wacrenier wrote:
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty. la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
JP WILLIAM
JP WILLIAM wrote:
J'essaye ce script et je vous tiens au courant. @+ "DominiX" a écrit dans le message de news: 41e4e869$0$29430$
ici même:JP WILLIAM a écrit
Laurent Wacrenier wrote:
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ? Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
Merci à vous tous. ça marche après quelques adaptations des messages.
JP WILLIAM wrote:
J'essaye ce script et je vous tiens au courant.
@+
"DominiX" <dominix@despamed.com> a écrit dans le message de news:
41e4e869$0$29430$626a14ce@news.free.fr...
ici même:JP WILLIAM <jp.william@wanadoo.fr> a écrit
Laurent Wacrenier wrote:
DominiX <dominix@despamed.com> écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ?
Ne faudrait-il pas une commande de style
print "$password n $password n ......./usr/bin/passwd";
Quelqu'un peut-il me corriger cette ligne de commande ?
Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty,
avec perl ca irait mieux d'utiliser Expect.pm
genre ca mais attention a la locale. non testé.
use Expect;
my $expobj = Expect->spawn("/bin/passwd", $user);
die "problem $!n" unless (defined $expobj);
$expobj->log_stdout(0);
$expobj->expect(10,"New password: ");
print $expobj "$passwdr";
$expobj->expect(10, "Re-enter new password: ");
print $expobj "$passwdr";
$pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
Merci à vous tous. ça marche après quelques adaptations des messages.
J'essaye ce script et je vous tiens au courant. @+ "DominiX" a écrit dans le message de news: 41e4e869$0$29430$
ici même:JP WILLIAM a écrit
Laurent Wacrenier wrote:
DominiX écrit:
(echo $password; echo $password) | passwd $user
passwd lit normalement sur un tty.
la commande echo est ume commande système. Comment l'intégrer ? Ne faudrait-il pas une commande de style print "$password n $password n ......./usr/bin/passwd"; Quelqu'un peut-il me corriger cette ligne de commande ? Suis-je dans la bonne voie ?
Laurent a raison passwd lit sur un tty, avec perl ca irait mieux d'utiliser Expect.pm genre ca mais attention a la locale. non testé.
use Expect; my $expobj = Expect->spawn("/bin/passwd", $user); die "problem $!n" unless (defined $expobj); $expobj->log_stdout(0); $expobj->expect(10,"New password: "); print $expobj "$passwdr"; $expobj->expect(10, "Re-enter new password: "); print $expobj "$passwdr"; $pobj->expect(10, "successfully changed") or die "password change failed";
$expobj->soft_close();
Merci à vous tous. ça marche après quelques adaptations des messages.