App-ShellUtils

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.008.
Changes
LICENSE
MANIFEST
META.json
META.yml
Makefile.PL
README
bin/guess-shell
dist.ini
lib/App/ShellUtils.pm
t/00-compile.t
t/author-pod-coverage.t
t/author-pod-syntax.t
weaver.ini

Makefile.PL  view on Meta::CPAN

use ExtUtils::MakeMaker;

my %WriteMakefileArgs = (
  "ABSTRACT" => "CLI utilities related to shells",
  "AUTHOR" => "perlancar <perlancar\@cpan.org>",
  "CONFIGURE_REQUIRES" => {
    "ExtUtils::MakeMaker" => 0
  },
  "DISTNAME" => "App-ShellUtils",
  "EXE_FILES" => [
    "bin/guess-shell"
  ],
  "LICENSE" => "perl",
  "NAME" => "App::ShellUtils",
  "PREREQ_PM" => {
    "Shell::Guess" => 0
  },
  "TEST_REQUIRES" => {
    "File::Spec" => 0,
    "IO::Handle" => 0,
    "IPC::Open3" => 0,

bin/guess-shell  view on Meta::CPAN

#!perl

use Shell::Guess;

my $shell = Shell::Guess->running_shell;
print $shell->name, "\n";

# ABSTRACT: Detect what shell we are running under
# PODNAME: guess-shell

__END__

=pod

=encoding UTF-8

=head1 NAME

guess-shell - Detect what shell we are running under

=head1 VERSION

This document describes version 0.001 of guess-shell (from Perl distribution App-ShellUtils), released on 2016-10-21.

=head1 SYNOPSIS

 % guess-shell
 bash

=head1 HOMEPAGE

Please visit the project's homepage at L<https://metacpan.org/release/App-ShellUtils>.

=head1 SOURCE

Source repository is at L<https://github.com/perlancar/perl-App-ShellUtils>.

lib/App/ShellUtils.pm  view on Meta::CPAN

=head1 VERSION

This document describes version 0.001 of App::ShellUtils (from Perl distribution App-ShellUtils), released on 2016-10-21.

=head1 DESCRIPTION

This distribution contains the following CLI utilities:

=over

=item * L<guess-shell>

=back

=head1 HOMEPAGE

Please visit the project's homepage at L<https://metacpan.org/release/App-ShellUtils>.

=head1 SOURCE

Source repository is at L<https://github.com/perlancar/perl-App-ShellUtils>.

t/00-compile.t  view on Meta::CPAN

use Test::More;

plan tests => 2 + ($ENV{AUTHOR_TESTING} ? 1 : 0);

my @module_files = (
    'App/ShellUtils.pm'
);

my @scripts = (
    'bin/guess-shell'
);

# no fake home requested

my $inc_switch = -d 'blib' ? '-Mblib' : '-Ilib';

use File::Spec;
use IPC::Open3;
use IO::Handle;