examples/improver now looks at the arguments

MANIFEST

@@ -15,4 +15,5 @@ t/eol.t
 t/fixme.t
 t/manifest.t
 t/modules-used.t
+t/pod-cm.t
 t/pod-coverage.t

examples/improver

@@ -9,11 +9,11 @@ use Grammar::Improver;
 
 # Initialize the Grammar::Improver module
 my $improver = Grammar::Improver->new(
-	api_url => 'https://api.languagetool.org/v2/check',
+	# api_url => 'https://api.languagetool.org/v2/check',
 );
 
 # Example text
-my $text = 'This are a sample text with mistake.';
+my $text = join(' ', @ARGV);
 
 # Improve grammar
 my $corrected_text = $improver->improve_grammar($text);

lib/Grammar/Improver.pm

@@ -3,6 +3,7 @@ package Grammar::Improver;
 use strict;
 use warnings;
 use Carp;
+use LWP::Protocol::https;
 use LWP::UserAgent;
 use JSON::MaybeXS;
 

t/pod-cm.t

@@ -0,0 +1,10 @@
+#!/usr/bin/perl -w
+
+use strict;
+use warnings;
+
+use Test::DescribeMe qw(author);
+use Test::Needs 'Test::Pod::Spelling::CommonMistakes';
+
+Test::Pod::Spelling::CommonMistakes->import();
+all_pod_files_ok();