Ask

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

 [ Bug Fixes ]
 - Ask::Gtk, Ask::Wx, Ask::Tk, and Ask::Zenity now check DISPLAY
   environment variable to see if they will be usable.
 - Better skipping of backends which cannot be loaded.

 [ Packaging ]
 - Switch to Dist::Inkt.

 [ Other ]
 - Replace Sub::Exporter::Progressive with Exporter::Tiny.
 - Replace namespace::sweep with namespace::autoclean.

0.007	2013-06-18

 [ Bug Fixes ]
 - Bumped Moo version requirement to 1.000006.
   Joel Berger++

 [ Other ]
 - Add a 'lang' option; use Lingua::Boolean::Tiny to process it.
   Lars Dɪᴇᴄᴋᴏᴡ 迪拉斯++

META.json  view on Meta::CPAN

            "Tk" : "0"
         },
         "requires" : {
            "Exporter::Shiny" : "0",
            "Lingua::Boolean::Tiny" : "0.003",
            "Module::Pluggable" : "0",
            "Module::Runtime" : "0",
            "Moo" : "1.000006",
            "Path::Tiny" : "0",
            "Type::Utils" : "0",
            "namespace::autoclean" : "0",
            "perl" : "5.008008"
         },
         "suggests" : {
            "Prima" : "0",
            "Wx" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Test::More" : "0.98"

META.yml  view on Meta::CPAN

  Term::Clui: '0'
  Tk: '0'
requires:
  Exporter::Shiny: '0'
  Lingua::Boolean::Tiny: '0.003'
  Module::Pluggable: '0'
  Module::Runtime: '0'
  Moo: '1.000006'
  Path::Tiny: '0'
  Type::Utils: '0'
  namespace::autoclean: '0'
  perl: '5.008008'
resources:
  Identifier: http://purl.org/NET/cpan-uri/dist/Ask/project
  bugtracker: http://rt.cpan.org/Dist/Display.html?Queue=Ask
  homepage: https://metacpan.org/release/Ask
  license: http://dev.perl.org/licenses/
  repository: git://github.com/tobyink/p5-ask.git
version: '0.015'
x_contributors:
  - 'Graham Knop (HAARG) <haarg@cpan.org>'

Makefile.PL  view on Meta::CPAN

                                          "Term::ANSIColor" => 0,
                                          "Term::Clui" => 0,
                                          "Tk" => 0,
                                        },
                          requires   => {
                                          "Exporter::Shiny" => 0,
                                          "Lingua::Boolean::Tiny" => 0.003,
                                          "Module::Pluggable" => 0,
                                          "Module::Runtime" => 0,
                                          "Moo" => 1.000006,
                                          "namespace::autoclean" => 0,
                                          "Path::Tiny" => 0,
                                          "perl" => 5.008008,
                                          "Type::Utils" => 0,
                                        },
                          suggests   => { Prima => 0, Wx => 0 },
                        },
                        test => { requires => { "Test::More" => 0.98 } },
                      },
  "provides"       => {
                        "Ask"            => { file => "lib/Ask.pm", version => 0.015 },

doap.ttl  view on Meta::CPAN

@prefix xsd:   <http://www.w3.org/2001/XMLSchema#> .

<http://dev.perl.org/licenses/>
	dc:title             "the same terms as the perl 5 programming language system itself".

<http://purl.org/NET/cpan-uri/dist/Ask/project>
	a                    doap:Project;
	dc:contributor       <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap-deps:runtime-recommendation [ doap-deps:on "System::Command"^^doap-deps:CpanId ], [ doap-deps:on "Gtk2"^^doap-deps:CpanId ], [ doap-deps:on "Tk"^^doap-deps:CpanId ], [ doap-deps:on "Caroline"^^doap-deps:CpanId ], [ doap-deps:on "Term::ANSIColor...
	doap-deps:runtime-requirement [ doap-deps:on "perl 5.008008"^^doap-deps:CpanId ], [ doap-deps:on "Module::Runtime"^^doap-deps:CpanId ], [ doap-deps:on "Moo 1.000006"^^doap-deps:CpanId ], [
		doap-deps:on "namespace::autoclean"^^doap-deps:CpanId;
	], [ doap-deps:on "Exporter::Shiny"^^doap-deps:CpanId ], [ doap-deps:on "Type::Utils"^^doap-deps:CpanId ], [
		doap-deps:on "Lingua::Boolean::Tiny 0.003"^^doap-deps:CpanId;
	], [ doap-deps:on "Module::Pluggable"^^doap-deps:CpanId ], [ doap-deps:on "Path::Tiny"^^doap-deps:CpanId ];
	doap-deps:runtime-suggestion [ doap-deps:on "Wx"^^doap-deps:CpanId ], [ doap-deps:on "Prima"^^doap-deps:CpanId ];
	doap-deps:test-requirement [ doap-deps:on "Test::More 0.98"^^doap-deps:CpanId ];
	doap:bug-database    <http://rt.cpan.org/Dist/Display.html?Queue=Ask>;
	doap:created         "2012-11-28"^^xsd:date;
	doap:developer       <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap:download-page   <https://metacpan.org/release/Ask>;
	doap:homepage        <https://metacpan.org/release/Ask>;

lib/Ask/Callback.pm  view on Meta::CPAN

use 5.008008;
use strict;
use warnings;

package Ask::Callback;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use namespace::autoclean;

with 'Ask::API';

has input_callback  => ( is => 'ro', required => 1 );
has output_callback => ( is => 'ro', required => 1 );

sub is_usable {
	my ( $self ) = @_;
	ref $self->output_callback eq 'CODE'
		and ref $self->input_callback eq 'CODE';

lib/Ask/Caroline.pm  view on Meta::CPAN

package Ask::Caroline;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Caroline ();
use Path::Tiny 'path';
use Term::ANSIColor 'colored';
use namespace::autoclean;

with 'Ask::API';

has caroline => (
	is      => 'lazy',
	default => sub {
		my $self = shift;
		Scalar::Util::weaken( my $weak = $self );
		'Caroline'->new(
			completion_callback => sub {

lib/Ask/Clui.pm  view on Meta::CPAN

use warnings;

package Ask::Clui;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Term::Clui 1.65 ();
use Path::Tiny 'path';
use namespace::autoclean;

with 'Ask::API';

sub BUILD {
	STDOUT->autoflush( 1 );
}

sub is_usable {
	my ( $self ) = @_;
	-t STDIN and -t STDOUT;

lib/Ask/Fallback.pm  view on Meta::CPAN

use warnings;

package Ask::Fallback;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Carp qw(croak);
use Path::Tiny qw(path);
use namespace::autoclean;

with 'Ask::API';

sub quality {
	return 1;
}

sub info {
	my ( $self, %o ) = @_;
	print STDERR "$o{text}\n";

lib/Ask/Gtk.pm  view on Meta::CPAN

use warnings;

package Ask::Gtk;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Gtk2 -init;
use Path::Tiny 'path';
use namespace::autoclean;

with 'Ask::API';

sub is_usable {
	my ( $self ) = @_;
	return !!$ENV{'DISPLAY'};
}

sub info {
	my ( $self, %o ) = @_;

lib/Ask/Prima.pm  view on Meta::CPAN

use warnings;

package Ask::Prima;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Prima 1.59 ();
use Path::Tiny 'path';
use namespace::autoclean;

with 'Ask::API';

has application => (
	is      => 'lazy',
	default => sub {
		require Prima::Application;
		require Prima::MsgBox;
		'Prima::Application'->import;
		return 1;

lib/Ask/STDIO.pm  view on Meta::CPAN

use 5.008008;
use strict;
use warnings;

package Ask::STDIO;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use namespace::autoclean;

with 'Ask::API';

sub is_usable {
	my ( $self ) = @_;
	-t STDIN and -t STDOUT;
}

sub quality {
	( -t STDIN and -t STDOUT ) ? 80 : 20;

lib/Ask/Tk.pm  view on Meta::CPAN

use warnings;

package Ask::Tk;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Path::Tiny 'path';
use Tk;
use namespace::autoclean;

with 'Ask::API';

sub is_usable {
	my ( $self ) = @_;
	return !!$ENV{'DISPLAY'};
}

sub quality {
	return 30;

lib/Ask/Wx.pm  view on Meta::CPAN

use warnings;

package Ask::Wx;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use Path::Tiny 'path';
use Wx;
use namespace::autoclean;

with 'Ask::API';

sub is_usable {
	my ( $self ) = @_;
	return !!$ENV{'DISPLAY'};
}

sub quality {
	return 10;    # raise to 50 once multi file selection implemented

lib/Ask/Zenity.pm  view on Meta::CPAN

package Ask::Zenity;

our $AUTHORITY = 'cpan:TOBYINK';
our $VERSION   = '0.015';

use Moo;
use File::Which qw(which);
use System::Command;
use Path::Tiny qw( path );
use namespace::autoclean;

has zenity_path => (
	is      => 'ro',
	default => sub { which( 'zenity' ) || '/usr/bin/zenity' },
);

has system_wrapper => (
	is      => 'ro',
	default => sub { 'System::Command' },
);

 view all matches for this distribution
 view release on metacpan -  search on metacpan