1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93
|
#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use App::CVSS;
exit App::CVSS->run(@ARGV) unless caller();
1;
__END__
=encoding utf-8
=head1 NAME
cvss - CVSS (Common Vulnerability Scoring System) command line interface
=head1 SYNOPSIS
cvss [OPTIONS]...STRING
cvss [--help|--man|-v]
Options:
--help Brief help message
--man Full documentation
-v Print version
--score Base score
--severity Base severity
--base-score
--base-severity
--temporal-score
--temporal-severity
--environmental-score
--environmental-severity
--exploitability-score
--impact-score
--modified-impact-score
-0, --null Return NULL char instead of new line
--format=FORMAT Output format
--json JSON output format (--format=json)
--xml XML output format (--format=xml)
Examples:
Decode the provided CVSS vector string:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --json | jq
Display the base score:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --base-score
Display the base severity:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --base-severity
=head1 DESCRIPTION
C<cvss> CVSS (Common Vulnerability Scoring System) command line interface
=head1 EXAMPLES
Decode the provided CVSS vector string and return JSON and send the STDOUT to L<jq>:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --json | jq
Display the base score:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --base-score
Display the base severity:
cvss CVSS:3.1/AV:A/AC:L/PR:L/UI:R/S:U/C:H/I:H/A:H --base-severity
=head1 AUTHOR
L<Giuseppe Di Terlizzi|https://metacpan.org/author/gdt>
=head1 COPYRIGHT AND LICENSE
Copyright © 2023-2024 L<Giuseppe Di Terlizzi|https://metacpan.org/author/gdt>
You may use and distribute this module according to the same terms
that Perl is distributed under.
|