Subversion Repositories sysadmin_scripts

Rev

Rev 184 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed 

#! /usr/bin/env perl

use strict;
use warnings;

my $targetDir = '/etc/certificates/';
my $remoteCommand = 'chmod 644 /etc/certificates/* && chown root:root /etc/certificates/* && service apache2 reload';
my $hostname = shift;
my $certname = shift;

die "Usage: $0 hostname certname\n" unless $hostname && $certname;

`scp $certname.crt $certname.key $hostname:$targetDir`;
`ssh $hostname '$remoteCommand'`;

print "$hostname updated and web server restarted\n";

1;