#!/usr/bin/perl # kickstart test script # by Patrick Devine (c) 2001 # # This script demonstrates how to use various methods in # RedHat::Kickstart can be used to generate a RedHat # kickstart file. # use lib 'lib'; use RedHat::Kickstart; my $x = new RedHat::Kickstart(); $x->inst_type( 'nfs' ); $x->inst_type( { nfsserver => 'engr-fez:/u1/RedHat' } ); $x->rootpw( '123bob' ); $x->auth( { 'useshadow' => '', 'enablemd5' => '' } ); $x->package( apache ); $x->package( samba ); $x->package( portmap ); $x->package( openssh ); $x->lilo( { 'location' => 'mbr' } ); $x->keyboard( 'us' ); $x->mouse( 'genericps/2' ); $x->timezone( 'US/Pacific' ); $x->network( 'dhcp' ); $x->clearpart( 'all' ); $x->partition( { dir => 'raid.01', ondisk => 'sda', size => 20, onprimary => 1 } ); $x->partition( { dir => 'raid.02', ondisk => 'sdb', size => 20, onprimary => 1 } ); $x->partition( { dir => 'raid.11', ondisk => 'sda', size => 200, grow } ); $x->partition( { dir => 'raid.12', ondisk => 'sdb', size => 200, grow } ); $x->partition( { type => 'swap', size => 128, ondisk => 'sda' } ); $x->partition( { type => 'swap', size => 128, ondisk => 'sdb' } ); $x->raid( { dir => '/boot', level => 1, device => 'md0', partitions => [ 'raid.01', 'raid.02' ] } ); $x->raid( { dir => '/', level => 0, device => 'md1', partitions => [ 'raid.11', 'raid.12' ] } ); print ${ $x->kickstart() };