Ask
    
    
  
  
  
view release on metacpan or search on metacpan
 [ 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ɪá´á´á´á´á´¡ è¿ªææ¯++
            "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"
  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 },
@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>;
	dc:issued            "2020-10-23"^^xsd:date;
	doap-changeset:changeset [
		doap-changeset:item [
			a doap-changeset:Packaging;
			rdfs:label "Switch to Dist::Inkt.";
		], [
			a doap-changeset:Change;
			rdfs:label "Replace Sub::Exporter::Progressive with Exporter::Tiny.";
		], [
			a doap-changeset:Change;
			rdfs:label "Replace namespace::sweep with namespace::autoclean.";
		], [
			a doap-changeset:Bugfix;
			rdfs:label "Ask::Gtk, Ask::Wx, Ask::Tk, and Ask::Zenity now check DISPLAY environment variable to see if they will be usable.";
		], [
			a doap-changeset:Bugfix;
			rdfs:label "Better skipping of backends which cannot be loaded.";
		];
	];
	doap-changeset:released-by <http://purl.org/NET/cpan-uri/person/tobyink>;
	doap:file-release    <http://backpan.cpan.org/authors/id/T/TO/TOBYINK/Ask-0.008.tar.gz>;
use Carp qw(croak);
use Moo::Role qw();
use Module::Runtime qw(use_module use_package_optimistically);
use Module::Pluggable (
	search_path => 'Ask',
	except      => [qw/ Ask::API Ask::Functions Ask::Question /],
	inner       => 0,
	require     => 0,
	sub_name    => '__plugins',
);
use namespace::autoclean;
sub import {
	shift;
	if ( @_ ) {
		require Ask::Functions;
		unshift @_, 'Ask::Functions';
		goto( $_[0]->can( 'import' ) );
	}
}
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' },
);
( run in 0.692 second using v1.01-cache-2.11-cpan-c333fce770f )