NAME

Class::Param::Callback - Param instance with callbacks

SYNOPSIS

%store  = ();
$param = Class::Param::Callback->new(
    get    => sub { return $store{ $_[1] }         },
    set    => sub { return $store{ $_[1] } = $_[2] },
    has    => sub { return exists $store{ $_[1] }  },
    names  => sub { return keys %store             },
    remove => sub { return delete $store{ $_[1] }  }
);

DESCRIPTION

Construct a params instance using callbacks.

METHODS

new

This method takes a hash of parameters. The following options are valid:

get

get => sub {
    my ( $self, $name ) = @_;
    return $hash{ $name };
}

Required.

set

set => sub {
    my ( $self, $name, $value ) = @_;
    return $hash{ $name } = $value;
}

Required.

names

names => sub {
    my ( $self ) = @_;
    return keys %hash;
}

Required.

remove

remove => sub {
    my ( $self, $name ) = @_;
    return delete $hash{ $name };
}

Required.

clear

clear => sub {
    my ( $self ) = @_;
    return %hash = ();
}

Optional.

count

count => sub {
    my ( $self ) = @_;
    return scalar keys %hash;
}

Optional.

has

has => sub {
    my ( $self, $name ) = @_;
    return exists $hash{ $name };
}

Optional.

param

param => sub { }

Optional. See Class::Param::Base for expected behavior.

add

add => sub { }

Optional. See Class::Param::Base for expected behavior.

scan

scan => sub { }

Optional. See Class::Param::Base for expected behavior.

as_hash

param => sub { }

Optional. See Class::Param::Base for expected behavior.

SEE ASLO

Class::Param.

AUTHOR

Christian Hansen chansen@cpan.org

COPYRIGHT

This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.