Unix自動化問題講解
我們在使用Unix的時候，經(jīng)常需要運用到Unix自動化的知識。今天，我們就來了解下Unix自動化的知識。任務自動化是一個很泛的主題。我將本節(jié)僅限于非交互式 簡單自動化。對于交互式命令的Unix自動化，Expect 是當前可用的***工具。應該要么了解它的語法，要么用 Perl Expect.pm 模塊?？梢詮?CPAN 獲取 Expect.pm；請參閱參考資料以了解更多詳細信息。
利用 cfengine，可以根據(jù)任意標準Unix自動化幾乎任何任務。但是，它的功能非常象 Makefile 功能，對變量的復雜操作是很難處理的。
當發(fā)現(xiàn)需要運行這樣的命令，該命令的參數(shù)來自于散列或通過單獨的函數(shù)時，通常***切換到 shell 腳本或 Perl。由于 Perl 的功能，其可能是較好的選擇。雖然，不應該將 shell 腳本棄為替代來使用。有時，Perl 是不必要的，您只需要運行一些簡單的命令。
Unix自動化中，自動添加用戶是一個常見問題?？梢跃帉懽约旱?adduser.pl 腳本，或者用大多數(shù)現(xiàn)代 Unix 系統(tǒng)提供的 adduser 程序。請確保使用的所有 Unix 系統(tǒng)間語法是一致的，但不要嘗試編寫一個通用的 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自動化的一個問題，我們就講解到這里了。
【編輯推薦】
