blob: f5cb28fc9e40f535da151bc5eec4e3ab1ece25a2 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
The author got really tired of statements that looked like:
$heap->{job}{$job} = {
source => $source,
dest => $destination,
options => $options,
};
and later:
if ($heap->{job}{$job}{options}{wibble} eq $something_else) {
# do something...
}
This module is meant to simplify this sort of things, with
optional persistence as a bonus.
|