view release on metacpan or  search on metacpan

shotgun.pl  view on Meta::CPAN

#!/usr/bin/env perl
# shotgun.pl - Shoots holes in files (CLI wrapper for Acme::Shotgun)
# Written by John R., Nov. 2023 — refactored to use Acme::Shotgun

use strict;
use warnings;

use Getopt::Long;

use lib "./lib";
use Acme::Shotgun;

sub usage {
    my $err_msg = shift;
    print "$err_msg\n" if $err_msg;
    print <<~EOF;
      Name:
          shotgun.pl - Shoots holes in files

      Usage: