use vars qw/$CONFIG $DATA/;
BEGIN {
$CONFIG = "$0.conf";
$DATA = retrieve($CONFIG) if -e $CONFIG;
}
END {
store($DATA, $CONFIG);
}
$DATA is a reference to a hash that contains the user
entered data. This little addition to the program means
the data entered by the user in the last session becomes
the default in this session... saves a heck of a lot of
typing - particularly during testing! In reply to Re: Storable
by Tyke
in thread Storable
by TheoPetersen
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |