diff options
author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2012-10-03 14:42:16 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2012-10-03 14:42:16 +0200 |
commit | 9a165138570b28998564744619a69085f8a4029d (patch) | |
tree | c3c74faec830551cb0b917adfdb05398092c6a1f | |
parent | 85b069d9bb94de4e01a4375d485b2a8a1f8c21ab (diff) |
Remove obsolete script generate_specfile.pl.
-rwxr-xr-x | generate_specfile.pl | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/generate_specfile.pl b/generate_specfile.pl deleted file mode 100755 index 957c721..0000000 --- a/generate_specfile.pl +++ /dev/null @@ -1,14 +0,0 @@ -#! /usr/bin/env perl -# Copyright 2012, Matthias Andreas Benkard <code@mail.matthias.benkard.de>. - -use common::sense; -use Modern::Perl; -use JSON; -use Crypt::OpenSSL::RSA; -use File::Slurp; - -my $key = Crypt::OpenSSL::RSA->new_private_key(scalar read_file('/etc/mulkid/rsa2048.pem')); -my ($n, $e, @stuff) = $key->get_key_parameters; -say encode_json({"public-key" => {e => $e->to_decimal, n => $n->to_decimal, algorithm => "RS"}, - "authentication" => "/browserid/authenticate.html", - "provisioning" => "/browserid/provision.html"}); |