Oto mój skrypt testowy. Nie mogę go uruchomić. Widzę dwa błędy:
Use of uninitialized value $answer in chop at /usr/sbin/adduser line 589.
Use of uninitialized value $answer in pattern match (m//) at /usr/sbin/adduser line 590.
Oto mój skrypt:
#!/bin/bash
sudo adduser myuser << ENDX
password
password
First Last
Y
ENDX
exit 0
Oto wynik:
me@mycomputer$ ./adduser.sh
Adding user `myuser' ...
Adding new group `myuser' (1001) ...
Adding new user `myuser' (1001) with group `myuser' ...
Creating home directory `/home/myuser' ...
Copying files from `/etc/skel' ...
Enter new UNIX password: Retype new UNIX password: passwd: password updated successfully
Changing the user information for myuser
Enter the new value, or press ENTER for the default
Full Name []: Room Number []: Work Phone []: Home Phone []: Other []: Use of uninitialized value $answer in chop at /usr/sbin/adduser line 589.
Use of uninitialized value $answer in pattern match (m//) at /usr/sbin/adduser line 590.
Is the information correct? [Y/n] me@mycomputer$
To jest na Kubuntu 12.04 LTS
$ bash --version
bash --version
GNU bash, version 4.2.25(1)-release (x86_64-pc-linux-gnu)
Oto wiersze z adduser (skrypt systemowy - niezmodyfikowany przeze mnie) z notacjami dwóch odpowiednich numerów wierszy:
for (;;) {
my $chfn = &which('chfn');
&systemcall($chfn, $new_name);
# Translators: [y/N] has to be replaced by values defined in your
# locale. You can see by running "locale yesexpr" which regular
# expression will be checked to find positive answer.
print (gtx("Is the information correct? [Y/n] "));
chop (my $answer=<STDIN>); <-- LINE 589
last if ($answer !~ m/$noexpr/o); <-- LINE 590
}