Subversion Repositories sysadmin_scripts

#! /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;