Umgestellt auf OO-Perl. Wrapper fuer einfachen Aufruf gebastelt.
[ssh-keysync.git] / files / ssh-keysync-merge.pl
1 #!/usr/bin/perl -w
2 #
3
4 use strict;
5 use RBM::sshKeySync::Merge;
6
7 my $merger = RBM::sshKeySync::Merge->new( debug => 1 );
8
9 $merger->merge_all_domains();