Replace An Address Object; Rename Address Objects - Juniper NETWORK AND SECURITY MANAGER 2010.4 - API GUIDE REV 1 Manual

Replace an Address Object

Rename Address Objects

Copyright © 2010, Juniper Networks, Inc.
$result = $address->addGlobalObjects('OBJECT_NAME'=>'Poly-1',
'GROUP_MEMBERS'=>\@members
@members = ( {
$result = $address->addGlobalObjects('OBJECT_NAME'=>'Poly-2',
'GROUP_MEMBERS'=>\@members
@members = ( { 'ADDRESS'=>'Foo-8' } );
$result = $address->addGlobalObjects('OBJECT_NAME'=>'Poly-3',
'GROUP_MEMBERS'=>\@members
Log out.
4.
This section shows how to replace an existing address objects.
To replace an address object:
Follow these steps to replace an existing object.
Log into the Perl client.
1.
Replace the object.
2.
Enter:
for( my $i = 1; $i < 10; $i++ ){
$address->replaceHostObjects('OBJECT_NAME'=>'Foo-'.$i,
'DOMAIN'=>'spglab.juniper.net', 'COLOR'=>'green' );
put_log('WARN', msg=>"Error while replacing Host objects." ) unless(
$result );
my @members = ('Foo-7','Foo-8');
$address->replaceGroupObjects('OBJECT_NAME'=>'New-Group-1',
'GROUP_MEMBERS'=>\@members, 'COLOR'=>'red' );
put_log('WARN', msg=>"Error while adding group objects." ) unless(
$result );
Log out.
3.
This section shows how to rename an existing address object.
To rename an address objects:
Log into the Perl client.
1.
Rename the object.
2.
Chapter 8: Using the API to Manage Shared Objects
);
'DOMAIN'=>'any',
'DEVICE'=>'any',
'ADDRESS'=>'Foo-7'
} );
);
);
$result =
}
$result =
85