NAME

Venus::Unpack - Unpack Class

ABSTRACT

Unpack Class for Perl 5

SYNOPSIS

package main;

use Venus::Unpack;

my $unpack = Venus::Unpack->new(args => ["hello", 123, 1.23]);

# my $args = $unpack->all->types('string', 'number', 'float')->args;

# ["hello", 123, 1.23]

DESCRIPTION

This package provides methods for validating, coercing, and otherwise operting on lists of arguments.

INHERITS

This package inherits behaviors from:

Venus::Kind::Utility

METHODS

This package provides the following methods:

all

all() (Unpack)

The all method selects all arguments for processing returns the invocant.

Since 2.01

all example 1
# given: synopsis

package main;

$unpack = $unpack->all;

# bless(..., 'Venus::Unpack')

arg

arg(Str $index) (Any)

The arg method returns the argument at the index specified.

Since 2.01

arg example 1
# given: synopsis

package main;

my $arg = $unpack->arg(0);

# "hello"
arg example 2
# given: synopsis

package main;

my $arg = $unpack->arg(1);

# 123
arg example 3
# given: synopsis

package main;

my $arg = $unpack->arg(2);

# 1.23

args

args(Any @args) (ArrayRef)

The args method returns all arugments as an arrayref, or list in list context. If arguments are provided they will overwrite the existing arugment list.

Since 2.01

args example 1
# given: synopsis

package main;

my $args = $unpack->args;

# ["hello", 123, 1.23]
args example 2
# given: synopsis

package main;

my $args = $unpack->args(1.23, 123, "hello");

# [1.23, 123, "hello"]

array

array() (Venus::Array)

The array method returns the argument list as a Venus::Array object.

Since 2.01

array example 1
# given: synopsis

package main;

my $array = $unpack->array;

# bless(..., 'Venus::Array')

cast

cast(Str $name) (ArrayRef)

The cast method processes the selected arguments, passing each value to the class name specified, or the "cast" in Venus::Type method, and returns results.

Since 2.01

cast example 1
# given: synopsis

package main;

my $cast = $unpack->all->cast;

# [
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::Number'),
#   bless(..., 'Venus::Float'),
# ]
cast example 2
# given: synopsis

package main;

my $cast = $unpack->all->cast('scalar');

# [
#   bless(..., 'Venus::Scalar'),
#   bless(..., 'Venus::Scalar'),
#   bless(..., 'Venus::Scalar'),
# ]

checks

checks(Str @types) (ArrayRef)

The checks method processes the selected arguments, passing each value to the "check" in Venus::Assert method with the type expression provided, and returns results.

Since 2.01

checks example 1
# given: synopsis

package main;

my $checks = $unpack->all->checks('string');

# [true, false, false]
checks example 2
# given: synopsis

package main;

my $checks = $unpack->all->checks('string | number');

# [true, true, false]
checks example 3
# given: synopsis

package main;

my $checks = $unpack->all->checks('string | number', 'float');

# [true, false, true]
checks example 4
# given: synopsis

package main;

my $checks = $unpack->all->checks('string', 'number', 'float');

# [true, true, true]
checks example 5
# given: synopsis

package main;

my $checks = $unpack->all->checks('boolean', 'value');

# [false, true, true]

copy

copy(Str @pairs) (Unpack)

The copy method copies values from the arugment list as properties of the underlying object and returns the invocant.

Since 2.01

copy example 1
# given: synopsis

package main;

$unpack = $unpack->copy(0 => 'arg1');

# bless({..., arg1 => 'hello'}, 'Venus::Unpack')
copy example 2
# given: synopsis

package main;

$unpack = $unpack->copy(0 => 'arg1', 2 => 'arg3');

# bless({..., arg1 => 'hello', arg3 => 1.23}, 'Venus::Unpack')
copy example 3
# given: synopsis

package main;

$unpack = $unpack->copy(0 => 'arg1', 1 => 'arg2', 2 => 'arg3');

# bless({..., arg1 => 'hello', arg2 => 123, arg3 => 1.23}, 'Venus::Unpack')

first

first() (Unpack)

The first method selects the first argument for processing returns the invocant.

Since 2.01

first example 1
# given: synopsis

package main;

$unpack = $unpack->first;

# bless(..., 'Venus::Unpack')

get

get(Str $index) (Any)

The get method returns the argument at the index specified.

Since 2.01

get example 1
# given: synopsis

package main;

my $get = $unpack->get;

# undef
get example 2
# given: synopsis

package main;

my $get = $unpack->get(0);

# "hello"
get example 3
# given: synopsis

package main;

my $get = $unpack->get(1);

# 123
get example 4
# given: synopsis

package main;

my $get = $unpack->get(2);

# 1.23
get example 5
# given: synopsis

package main;

my $get = $unpack->get(3);

# undef

into

into(Str @args) (Any)

The into method processes the selected arguments, passing each value to the class name specified, and returns results.

Since 2.01

into example 1
# given: synopsis

package main;

my $cast = $unpack->all->into('Venus::String');

# [
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::String'),
# ]
into example 2
# given: synopsis

package main;

my $cast = $unpack->all->into('Venus::String', 'Venus::Number');

# [
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::Number'),
#   bless(..., 'Venus::Number'),
# ]
into example 3
# given: synopsis

package main;

my $cast = $unpack->all->into('Venus::String', 'Venus::Number', 'Venus::Float');

# [
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::Number'),
#   bless(..., 'Venus::Float'),
# ]

last

last() (Unpack)

The last method selects the last argument for processing returns the invocant.

Since 2.01

last example 1
# given: synopsis

package main;

$unpack = $unpack->last;

# bless(..., 'Venus::Unpack')

list

list(Str | CodeRef $code, Any @args) (ArrayRef)

The list method returns the result of the dispatched method call as an arrayref, or list in list context.

Since 2.01

list example 1
# given: synopsis

package main;

my (@args) = $unpack->all->list('cast');

# (
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::Number'),
#   bless(..., 'Venus::Float'),
# )
list example 2
# given: synopsis

package main;

my ($string) = $unpack->all->list('cast');

# (
#   bless(..., 'Venus::String'),
# )
list example 3
# given: synopsis

package main;

my (@args) = $unpack->all->list('cast', 'string');

# (
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::String'),
# )
list example 4
# given: synopsis

package main;

my (@args) = $unpack->use(0,2)->list('cast', 'string', 'float');

# (
#   bless(..., 'Venus::String'),
#   bless(..., 'Venus::Float'),
# )

move

move(Str @pairs) (Unpack)

The move method moves values from the arugment list, reducing the arugment list, as properties of the underlying object and returns the invocant.

Since 2.01

move example 1
# given: synopsis

package main;

$unpack = $unpack->move(0 => 'arg1');

# bless({..., arg1 => 'hello'}, 'Venus::Unpack')
move example 2
# given: synopsis

package main;

$unpack = $unpack->move(0 => 'arg1', 2 => 'arg3');

# bless({..., arg1 => 'hello', arg3 => 1.23}, 'Venus::Unpack')
move example 3
# given: synopsis

package main;

$unpack = $unpack->move(0 => 'arg1', 1 => 'arg2', 2 => 'arg3');

# bless({..., arg1 => 'hello', arg2 => 123, arg3 => 1.23}, 'Venus::Unpack')

one

one(Str | CodeRef $code, Any @args) (Any)

The one method returns the first result of the dispatched method call.

Since 2.01

one example 1
# given: synopsis

package main;

my $one = $unpack->all->one('cast');

# (
#   bless(..., 'Venus::String'),
# )
one example 2
# given: synopsis

package main;

my $one = $unpack->all->one('cast', 'string');

# (
#   bless(..., 'Venus::String'),
# )

reset

reset(Any @args) (Unpack)

The reset method resets the arugments list (if provided) and deselects all arguments (selected for processing) and returns the invocant.

Since 2.01

reset example 1
# given: synopsis

package main;

$unpack = $unpack->all->reset;

# bless(..., 'Venus::Unpack')
reset example 2
# given: synopsis

package main;

$unpack = $unpack->all->reset(1.23, 123, "hello");

# bless(..., 'Venus::Unpack')

set

set(Str $index, Any $value) (Any)

The set method assigns the value provided at the index specified and returns the value.

Since 2.01

set example 1
# given: synopsis

package main;

my $set = $unpack->set;

# undef
set example 2
# given: synopsis

package main;

my $set = $unpack->set(0, 'howdy');

# "howdy"
set example 3
# given: synopsis

package main;

my $set = $unpack->set(1, 987);

# 987
set example 4
# given: synopsis

package main;

my $set = $unpack->set(2, 12.3);

# 12.3
set example 5
# given: synopsis

package main;

my $set = $unpack->set(3, 'goodbye');

# "goodbye"

signature

signature(Str $name, Str @types) (ArrayRef)

The signature method processes the selected arguments, passing each value to the "validate" in Venus::Assert method with the type expression provided and throws an exception on failure and otherise returns the results as an arrayref, or as a list in list context.

Since 2.01

signature example 1
# given: synopsis

package main;

my ($string, $number, $float) = $unpack->all->signature(
  'example-1',
  'string | number | float',
);

# ("hello", 123, 1.23)
signature example 2
 # given: synopsis

 package main;

 my ($string, $number, $float) = $unpack->all->signature(
   'example-2',
   'string', 'number', 'float',
);

 # ("hello", 123, 1.23)
signature example 3
# given: synopsis

package main;

my $results = $unpack->all->signature(
  'example-3',
  'string', 'number',
);

# Exception! (isa Venus::Assert::Error)
signature example 4
# given: synopsis

package main;

my $results = $unpack->all->signature(
  'example-4',
  'string',
);

# Exception! (isa Venus::Assert::Error)

types

types(Str @types) (Unpack)

The types method processes the selected arguments, passing each value to the "validate" in Venus::Assert method with the type expression provided, and unlike the "validate" method returns the invocant.

Since 2.01

types example 1
# given: synopsis

package main;

$unpack = $unpack->all->types('string | number | float');

# bless({...}, 'Venus::Unpack')
types example 2
# given: synopsis

package main;

$unpack = $unpack->all->types('string', 'number', 'float');

# bless({...}, 'Venus::Unpack')
types example 3
# given: synopsis

package main;

$unpack = $unpack->all->types('string', 'number');

# Exception! (isa Venus::Error)

# argument #3 error
types example 4
# given: synopsis

package main;

$unpack = $unpack->all->types('string');

# Exception! (isa Venus::Error)

# argument #2 error

use

use(Int @args) (Unpack)

The use method selects the arguments specified (by index) for processing returns the invocant.

Since 2.01

use example 1
# given: synopsis

package main;

$unpack = $unpack->use(1,2);

# bless(..., 'Venus::Unpack')
use example 2
# given: synopsis

package main;

$unpack = $unpack->use(1,0);

# bless(..., 'Venus::Unpack')
use example 3
# given: synopsis

package main;

$unpack = $unpack->use(2,1,0);

# bless(..., 'Venus::Unpack')

validate

validate(Str @types) (Unpack)

The validate method processes the selected arguments, passing each value to the "validate" in Venus::Assert method with the type expression provided and throws an exception on failure and otherise returns the resuts.

Since 2.01

validate example 1
# given: synopsis

package main;

my $results = $unpack->all->validate('string | number | float');

# ["hello", 123, 1.23]
validate example 2
# given: synopsis

package main;

my $results = $unpack->all->validate('string', 'number', 'float');

# ["hello", 123, 1.23]
validate example 3
# given: synopsis

package main;

my $results = $unpack->all->validate('string', 'number');

# Exception! (isa Venus::Assert::Error)
validate example 4
# given: synopsis

package main;

my $results = $unpack->all->validate('string');

# Exception! (isa Venus::Assert::Error)

AUTHORS

Awncorp, awncorp@cpan.org

LICENSE

Copyright (C) 2000, Al Newkirk.

This program is free software, you can redistribute it and/or modify it under the terms of the Apache license version 2.0.