[gruntmaster-data.git] / lib / Gruntmaster / App / Command / Get.pm

package Gruntmaster::App::Command::Get;

use 5.014000;
use warnings;

our $VERSION = '5999.000_004';

use Gruntmaster::App '-command';
use Gruntmaster::Data;

sub usage_desc { '%c [-cjpu] get id column' }

sub validate_args {
	my ($self, $opt, $args) = @_;
	my @args = @$args;
	$self->usage_error('No table selected') unless $self->app->table;
	$self->usage_error('Wrong number of arguments') if @args != 2;
}

sub execute {
	my ($self, $opt, $args) = @_;
	my ($obj, $col) = @$args;
	say db->select($self->app->table, $col, {id => $obj})->flat
}

1;
__END__
Commit	Line	Data
92f74061 MG	1	package Gruntmaster::App::Command::Get;
	2
	3	use 5.014000;
	4	use warnings;
	5
	6	our $VERSION = '5999.000_004';
	7
	8	use Gruntmaster::App '-command';
	9	use Gruntmaster::Data;
	10
	11	sub usage_desc { '%c [-cjpu] get id column' }
	12
	13	sub validate_args {
	14	my ($self, $opt, $args) = @_;
	15	my @args = @$args;
	16	$self->usage_error('No table selected') unless $self->app->table;
	17	$self->usage_error('Wrong number of arguments') if @args != 2;
	18	}
	19
	20	sub execute {
	21	my ($self, $opt, $args) = @_;
	22	my ($obj, $col) = @$args;
	23	say db->select($self->app->table, $col, {id => $obj})->flat
	24	}
	25
	26	1;
	27	__END__