![[BACK]](/icons/back.gif){kind=icon}
Return to make_domain_coordinator.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / build|
Return to make_domain_coordinator.pl CVS log | Up to [LON-CAPA] / loncom / build |
| version 1.4, 2002/06/10 01:50:16 | version 1.5, 2002/06/10 02:01:16 |
|---|---|
| Line 130 unless ($domain=~/^\w+$/ and $domain!~/\ | Line 130 unless ($domain=~/^\w+$/ and $domain!~/\ |
| "\n"; | "\n"; |
| } | } |
| print "Password: "; $|=0; | print "Password: "; $|=1; |
| my $passwd=<>; # read in password from standard input | my $passwd=<>; # read in password from standard input |
| chomp($passwd); | chomp($passwd); |