Git/testssl.sh
1
0
Fork 0
mirror of https://github.com/drwetter/testssl.sh.git synced 2025-09-02 01:58:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

Update docu and (futile) perl script

Browse Source
This commit is contained in:
Dirk
2025-04-09 20:00:47 +02:00
parent f337f53e49
commit 647aeae205
2 changed files with 19 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
utils/update_client_sim_data.pl
View File

@ -1,5 +1,7 @@
#!/usr/bin/perl
### This is futile as the data havent changed for an eternity
use strict;
use Data::Dumper;
use JSON;
@ -15,8 +17,8 @@ $ossl =~ s/\R//g; # remove LFs
die "Unable to open $ossl" unless -f $ossl;
my $ossl = "$ossl" . " ciphers -V 'ALL:COMPLEMENTOFALL:\@STRENGTH'";
# we get all data from here
my $json = `curl 'https://api.dev.ssllabs.com/api/v3/getClients'`;
# we got all data from here : 'https://api.dev.ssllabs.com/api/v3/getClients'. New URL is below but the output hasn't changed either
my $json = `curl 'https://api.ssllabs.com/api/v3/getClients'`;
foreach my $line ( split /\n/, `$ossl`) {
my @fields = split /\s+/, $line;