我們在使用Unix的時候，經常需要運用到Unix自動化的知識。今天，我們就來了解下Unix自動化的知識。任務自動化是一個很泛的主題。我將本節僅限于非交互式 簡單自動化。對于交互式命令的Unix自動化，Expect 是當前可用的***工具。應該要么了解它的語法，要么用 Perl Expect.pm 模塊。可以從 CPAN 獲取 Expect.pm；請參閱參考資料以了解更多詳細信息。

利用 cfengine，可以根據任意標準Unix自動化幾乎任何任務。但是，它的功能非常象 Makefile 功能，對變量的復雜操作是很難處理的。

當發現需要運行這樣的命令，該命令的參數來自于散列或通過單獨的函數時，通常***切換到 shell 腳本或 Perl。由于 Perl 的功能，其可能是較好的選擇。雖然，不應該將 shell 腳本棄為替代來使用。有時，Perl 是不必要的，您只需要運行一些簡單的命令。

Unix自動化中，自動添加用戶是一個常見問題。可以編寫自己的 adduser.pl 腳本，或者用大多數現代 Unix 系統提供的 adduser 程序。請確保使用的所有 Unix 系統間語法是一致的，但不要嘗試編寫一個通用的 adduser 程序接口。

它太難了，在您認為涵蓋了所有 Unix 變體后，遲早會有人要求 Win32 或 MacOS 版本。這不是僅僅用 Perl 就能解決的問題之一，除非您是非常有野心的。這里只是讓腳本詢問用戶名、密碼、主目錄等等，并以 system() 調用來調用 adduser。

清單 4：用簡單的腳本調用 adduser
 

#!/usr/bin/perl -w   
use strict;   
my %values; # will hold the values to fill in   
# these are the known adduser switches   
my %switches = ( home_dir => '-d', comment => '-c', group => '-G',   
password => '-p', shell => '-s', uid => '-u');   
# this location may vary on your system   
my $command = '/usr/sbin/adduser ';   
# for every switch, ask the user for a value   
foreach my $setting (sort keys %switches, 'username')   
{   
print "Enter the $setting or press Enter to skip: ";   
$values{$setting} = ;   
chomp $values{$setting};   
# if the user did not enter data, kill this setting   
delete $values{$setting} unless length $values{$setting};   
}   
die "Username must be provided" unless exists $values{username};   
# for every filled-in value, add it with the right switch to the comma  
nd   
foreach my $setting (sort keys %switches)   
{   
next unless exists $values{$setting};   
$command .= "$switches{$setting} $values{$setting} ";   
}   
# append the username itself   
$command .= $values{username};   
# important - let the user know what's going to happen   
print "About to execute [$command]\n";   
# return the exit status of the command   
exit system($command);  

Unix自動化的一個問題，我們就講解到這里了。

【編輯推薦】

1. Unix系統中知識講解
2. Unix cpio命令詳細解析
3. AIX CDE的問題解決講解
4. Unix系統與小型機的討論
5. Unix Telnet知識講解