refactor tests, update cpanfile and add workflow for running test suite

.github/workflows/test-suite.yml

@@ -0,0 +1,28 @@
+name: Test Suite
+
+on:
+  pull_request:
+    branches:
+      - main
+      - develop
+
+jobs:
+  test:
+    runs-on: ubuntu-latest
+
+    steps:
+      - name: Checkout repository
+        uses: actions/checkout@v4
+
+      - name: Setup Perl
+        run: |
+          sudo apt-get update
+          sudo apt-get install -y perl
+          sudo apt-get install -y cpanminus
+
+      - name: Install dependencies
+        run: sudo cpanm --installdeps --with-test .
+
+      - name: Run tests
+        working-directory: ./tests
+        run: prove -r

.perlcriticrc

@@ -1,4 +1,7 @@
 severity = 3
 
 [-TestingAndDebugging::RequireUseStrict]
-[-TestingAndDebugging::RequireUseWarnings]
+[-TestingAndDebugging::RequireUseWarnings]
+
+[TestingAndDebugging::ProhibitNoWarnings]
+allow = once

cpanfile

@@ -1,3 +1,11 @@
 requires "Getopt::Long", "2.54";
 requires "Mojo::JSON";
-requires "Mojo::UserAgent";
+requires "Mojo::UserAgent";
+
+on 'test' => sub {
+    requires "Test::More";
+    requires "Test::Exception";
+    requires "Test::MockObject";
+    requires "Test::Output";
+    requires "Capture::Tiny";
+};

tests/no-open-secret-scanning-alerts.t

@@ -50,6 +50,7 @@ BEGIN {
     }
 }
 
+no warnings 'once';
 *Mojo::UserAgent::new = \&MockMojoUserAgent::new;
 
 subtest 'No open secret scanning alerts' => sub {

tests/open-code-scanning-alerts-exceeding-limits.t

@@ -39,10 +39,10 @@ subtest 'Open code scanning alerts exceeding limits' => sub {
 
     my $mock_response = Mojo::UserAgent -> set_mock_response(Test::MockObject -> new);
     $mock_response -> set_always('code', 200);
-    $mock_response -> set_always('json', [
-        { state => 'open', rule => { severity => 'high' } },
-        { state => 'open', rule => { severity => 'high' } },
-        { state => 'open', rule => { severity => 'medium' } },
+    $mock_response->set_always('json', [
+        { state => 'open', rule => { security_severity_level => 'high' } },
+        { state => 'open', rule => { security_severity_level => 'high' } },
+        { state => 'open', rule => { security_severity_level => 'medium' } },
     ]);
 
     my %severity_limits = (

tests/open-secret-scanning-alerts-exceeding-limits.t

@@ -50,6 +50,7 @@ BEGIN {
     }
 }
 
+no warnings 'once';
 *Mojo::UserAgent::new = \&MockMojoUserAgent::new;
 
 subtest 'Open secret scanning alerts exceeding limits' => sub {

tests/open-secret-scanning-alerts-within-limits.t

@@ -50,6 +50,7 @@ BEGIN {
     }
 }
 
+no warnings 'once';
 *Mojo::UserAgent::new = \&MockMojoUserAgent::new;
 
 subtest 'Open secret scanning alerts within limits' => sub {
@@ -60,7 +61,7 @@ subtest 'Open secret scanning alerts within limits' => sub {
     ]);
 
     MockMojoUserAgent::setup_locations_response(200, [
-        { path => 'file1.txt', start_line => 10 },
+        { details => { path => 'file.txt', start_line => 10 } },
     ]);
 
     my %severity_limits = (
@@ -73,7 +74,7 @@ subtest 'Open secret scanning alerts within limits' => sub {
     my $result;
     my $expected_output_part1 = qr/\[!\]\ Total\ of\ open\ secret\ scanning\ alerts:\ 1/xsm;
     my $expected_output_part2 = qr/\[-\]\ Alert\ 1\ found\ in\ the\ following\ locations:/xsm;
-    my $expected_output_part3 = qr/File:\ file1\.txt,\ Start\ line:\ 10/xsm;
+    my $expected_output_part3 = qr/File:\ file\.txt,\ Start\ line:\ 10/xsm;
     my $expected_output_part4_part1 = qr/\[-\]\ Number\ of\ secret\ scanning\ alerts\ \(/xsm;
     my $expected_output_part4_part2 = qr/1\)\ is\ within\ the\ acceptable\ limit\ \(/xsm;
     my $expected_output_part4_part3 = qr/1\)\./xsm;

tests/secrets-api-error-handling.t

@@ -50,6 +50,7 @@ BEGIN {
     }
 }
 
+no warnings 'once';
 *Mojo::UserAgent::new = \&MockMojoUserAgent::new;
 
 subtest 'API error handling' => sub {