|
NAMEBigIP::ParseConfig - F5/BigIP configuration parserSYNOPSISuse BigIP::ParseConfig; # Module initialization my $bip = new BigIP::ParseConfig( '/config/bigip.conf' ); # Iterate over pools foreach my $pool ( $bip->pools() ) { # Iterate over pool members foreach my $member ( $bip->members( $pool ) ) { # Change port from 80 to 443 if ( $member /^(\d+\.\d+\.\d+\.\d+):80/ ) { push @members, "$1:443"; my $change = 1; } } # Commit the change above (80->443) if ( $change ) { $bip->modify( type => 'pool', key => $pool, members => [ @members ] ); } } # Write out a new config file $bip->write( '/config/bigip.conf.new' ); DESCRIPTIONBigIP::ParseConfig provides a Perl interface to reading, writing, and manipulating configuration files used on F5 (BigIP) LTM network devices.This module is currently a work-in-progress. Please e-mail with problems, bug fixes, comments and complaints. CONSTRUCTOR
METHODS
Following type and key should be a string or a reference to an array of strings. See the example below for more details. Examples $bip->modify( type => 'virtual', key => 'Production_LDAP_vip', persist => 'cookie' ); $bip->modify( type => 'pool', key => 'Production_LDAP_pool', members => [ '192.168.0.1:636', '192.168.0.2:636' ] );
AUTHORScott Schneider <sschneid@gmail.com>
Visit the GSP FreeBSD Man Page Interface. |