Displaying 1 result from an estimated 1 matches for "database_server_here".
2008 Feb 11
9
Storeconfigs purge Perl
...:)
#!/usr/bin/perl
#
# Perl DBI to remove all related entries from Puppet''s storeconfigs database.
# Use when a host is removed from the Puppet network forcibly
# Alternatives: run puppet on host to be removed with a blank manifest (node blah {})
#
use DBI;
my $dsn = ''DBI:mysql:database_server_here'';
my $db_user = ''root'';
my $db_pass = ''xxx'';
my $dbh = DBI->connect($dsn, $db_user, $db_pass);
my $query;
if (($#ARGV + 1) ne 1) {
print "Fail.\n";
print "Usage: $ARGV[0] host_name\n";
}
else {
my $result;
print "...