Lexical::Persistence 0.97

Lexical::Persistence is a Perl module for persistent lexical variable values for arbitrary calls.

SYNOPSIS

#!/usr/bin/perl

use Lexical::Persistence;

my $persistence = Lexical::Persistence->new();
foreach my $number (qw(one two three four five)) {
$persistence->call(&target, number => $number);
}

exit;

sub target {
my $arg_number; # Argument.
my $narf_x++; # Persistent.
my $_i++; # Dynamic.
my $j++; # Persistent.

print "arg_number = $arg_numbern";
print "tnarf_x = $narf_xn";
print "t_i = $_in";
print "tj = $jn";
}