NAME

DBIx::Array::Session::Action - This module ties DBIx::Array->{"action"} to the database

SYNOPSIS

use DBIx::Array;
my $dbx=DBIx::Array->new;
$dbx->connect($connection, $user, $pass, \%opt); #passed to DBI
$dbx->{"action"}="Main";
while ($this or $that) {
  local $dbx->{"action"}="This or That Loop";
}

DESCRIPTION

This package ties the $dbx->{"action"} scalar to the database so that a local assignment to $dbx->{"action"} will set action twice. Once at the beginning and once at the end of the local variable scope.

USAGE

$dbx->action("Default");
{ #any block
  local $dbx->{"action"}="block action";
  #action is now "block action".
}
#action is now "Default" again.

foreach my $i (1 .. 5) {
  local $dbx->{"action"}="Loop $i";
  #action is now "Loop X".
}
#action is now "Default" again.

TIESCALAR

FETCH

Gets action from database

STORE

Sets Action in database

PROPERTIES

parent

my $parent=$self->parent; #isa L<DBIx::Array>

BUGS

Send email to author and log on RT.

SUPPORT

DavisNetworks.com supports all Perl applications big or small.

AUTHOR

Michael R. Davis
CPAN ID: MRDVT
STOP, LLC
domain=>stopllc,tld=>com,account=>mdavis
http://www.stopllc.com/

COPYRIGHT

This program is free software licensed under the...

The BSD License

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

DBIx::Array