NAME

App::Stow::Check - Base class for stow-check script.

SYNOPSIS

 use App::Stow::Check;

 my $app = App::Stow::Check->new;
 my $exit_code = $app->run;

METHODS

new

 my $app = App::Stow::Check->new;

Constructor.

Returns instance of object.

run

 my $exit_code = $app->run;

Run method. Check if command is in stow directory and print error message (STDERR, exit code 1) or dist name (STDOUT, exit code 0).

Returns exit code.

ERRORS

 run():
         Command '%s' doesn't use stow.
         Command '%s' don't use 'bin/sbin' path.
         Command '%s' not found.
         Stow directory '%s' doesn't exist.

EXAMPLE

 use strict;
 use warnings;

 use App::Stow::Check;

 # Arguments.
 @ARGV = (
         '-h',
 );

 # Run.
 exit App::Stow::Check->new->run;

 # Output:
 # Usage: ./ex1.pl [-d stow_dir] [-h] [--version] command
 #         -d stow_dir     Stow directory (default value is '/usr/local/stow').
 #         -h              Print help.
 #         --version       Print version.
 #         command         Command for which is stow dist looking.

DEPENDENCIES

Cwd, File::Spec::Functions, File::Which, Getopt::Std, Readonly.

REPOSITORY

https://github.com/michal-josef-spacek/App-Stow-Check

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

© 2021-2022 Michal Josef Špaček

BSD 2-Clause License

VERSION

0.03