Hh :: unispool :: התצורה התצורה של Hollandhouse 'Unispool
הורד עכשיו

Hh :: unispool :: התצורה דירוג וסיכום

Hh :: unispool :: התצורה תגים

פרל מודול תְצוּרָה תצורת UNISPOOL Hollandhouse UNISPOOL

Hh :: unispool :: התצורה תיאור

Hollandhouse 'תצורת UNISPOOL HH :: UNISPOOL :: תצורה היא מודול Perl שמנהלת קבצי תצורה של התצורה של ההולנדפול. קבצים ניתן לקרוא, כתוב, שנוצר מאפס ו diff-ed.synopsis להשתמש קפדנית; השתמש HH :: Unispool :: תצורה; השתמש HH :: Unispool :: תצורה :: OS; השתמש HH :: Unispool :: תצורה :: כניסה :: מסנן; השתמש HH :: Unispool :: תצורה :: כניסה :: מערכת; השתמש HH :: UNISPOOL :: תצורה :: כניסה :: התקן :: 5; השתמש HH :: Unispool :: תצורה :: כניסה :: מכשיר :: 6; השתמש HH :: Unispool :: תצורה :: כניסה :: Remotesystem :: 8; # לקרוא ולכתוב config שלי $ conf1 = hh :: unispool :: config-> new_from_file ('t / config.sample'); $ conf1-> כתוב ('t / config.sample.1.out'); # קרא שוב, לשנות מעט ו diff config שלי $ conf2 = hh :: unispool :: config-> new_from_file ('t / config.sample'); $ conf2-> delete_system ('foobar.bar.org'); שלי $ Tiff = $ conf1-> הבדל ($ conf2); אם ($ diff) {print stderr "\ Nthis פלט צפוי \ N"; הדפס סטורר "הבדלים \ n"; הדפס Stderr $ diff; הדפס Stderr "\ Nthis פלט היה צפוי \ n"; } # יצירת תצורה מאפס שלי $ conf3 = hh :: Unispool :: config-> חדש (); # צור מסנן והוסף אותו לתצורה שלי $ FLT = HH :: UNISPOOL :: תצורה :: ערך :: מסנן-> חדש ({name => 'חתול', file => '/ usr / bin / cat' ,}); $ conf3-> add_filter ($ FLT); # ליצור את מערכת _Network_ ולהוסיף אותו לתצורה שלי Sysn = hh :: Unispool :: תצורה :: כניסה :: מערכת-> חדש ({name => '_network_',}); $ conf3-> add_system ($ sysn); # הוסף סוג 8 מערכת מרחוק _Network_ $ RSYS = HH :: UNISPOOL :: Config :: Entr :: Remotesystem :: 8-> חדש ({name => 'foo', OS => HH :: Unispool :: תצורת :: OS -> חדש ({OS => 'Solaris'}), Remote_Node_Name => 'foo.bar.org',}); $ sysn-> add_remote_system ($ rsys); # הוסף התקן מסוג 5 כדי _network_ שלי $ dev = hh :: unispool :: התצורה :: כניסה :: התקן :: 5-> חדש ({name => 'lp', filter_name => 'cat', remote_device_name => 'LP', Remote_System_Name => 'Foo', Description => 'LP',}); $ sysn-> add_device ($ dev); # ליצור את מערכת Foo.Bar.org ולהוסיף אותו לתצורה שלי $ sysf = hh :: Unispool :: תצורת :: כניסה :: מערכת-> חדש ({name => 'foo.barg', local_system_name = > 'Foo', Network_name => 'foo.bar.org', OS => HH :: Unispool :: התצורה :: OS-> חדש ({OS => 'Solaris'}), הקלד => 'CS', }); $ conf3-> add_system ($ sysf); # הוסף סוג 6 מכשיר כדי foo.bar.org $ dev = hh :: unispool :: התצורה :: כניסה :: התקן :: 6-> חדש ({name => 'lp1', filter_name => 'חתול', Remote_Node_Name => 'lp1.foo.bar.org', תיאור => 'LP1',}); $ sysf-> add_device ($ dev); # הוסף עוד סוג 6 מכשיר כדי foo.bar.org $ dev = hh :: unispool :: התצורה :: ערך :: התקן :: 6-> חדש ({name => 'lp2', filter_name => 'cat', Remote_Node_Name => 'lp2.foo.bar.org', תיאור => 'LP2',}); $ sysf-> add_device ($ dev); # הוסף עוד סוג 3 התקן כדי foo.bar.org $ dev = hh :: Unispool :: תצורה :: כניסה :: התקן :: 3-> חדש ({name => 'lp', filter_name => 'חתול', ame_device_name => , תיאור => 'LP',}); $ sysf-> add_device ($ dev); # כתוב את התצורה $ conf3-> לכתוב ('t / config.sample.3.out'); דרישות: · פרל

Hh :: unispool :: התצורה תוכנה קשורה