diff options
author | JozanLeClerc <bousset.rudy@gmail.com> | 2020-07-06 17:31:29 +0200 |
---|---|---|
committer | JozanLeClerc <bousset.rudy@gmail.com> | 2020-07-06 17:31:29 +0200 |
commit | ec79a53cba205168bf34d8de2907dc3116b2d2a8 (patch) | |
tree | 5964b0d4c7e4761a216f64710017be8102c1c830 /gitjoe-addsshkey.pl | |
parent | New script (diff) | |
download | joe-scripts-ec79a53cba205168bf34d8de2907dc3116b2d2a8.tar.gz joe-scripts-ec79a53cba205168bf34d8de2907dc3116b2d2a8.tar.bz2 joe-scripts-ec79a53cba205168bf34d8de2907dc3116b2d2a8.tar.xz joe-scripts-ec79a53cba205168bf34d8de2907dc3116b2d2a8.tar.zst joe-scripts-ec79a53cba205168bf34d8de2907dc3116b2d2a8.zip |
Trying that one
Diffstat (limited to '')
-rwxr-xr-x | gitjoe-addsshkey.pl | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/gitjoe-addsshkey.pl b/gitjoe-addsshkey.pl index 9f219b9..7dfd5cc 100755 --- a/gitjoe-addsshkey.pl +++ b/gitjoe-addsshkey.pl @@ -3,3 +3,24 @@ use strict; use warnings; +sub main { + my $argc = $#ARGV + 1; + if ($argc < 2) { + print colored("Failed!\n", 'bold red') + . "Missing argument, 2 needed " + . colored("[user - ssh public key]", 'bold') + . "\n"; + exit 1; + } + my $usr = $ARGV[0]; + my $sshkey = $ARGV[1]; + my $home_dir = '/usr/home/' . $usr . '/'; + open(my $fh, '>:encoding(UTF-8)', $home_dir . '.ssh/authorized_keys'); + print $fh "$sshkey\n"; + close($fh); + exit; +} + +main(); + +__END__ |