version 1.25, 2008/11/17 13:22:01
|
version 1.26, 2008/11/17 13:24:02
|
Line 102 our %EXPORT_TAGS = ( 'match' =>[qw($matc
|
Line 102 our %EXPORT_TAGS = ( 'match' =>[qw($matc
|
my %perlvar; |
my %perlvar; |
|
|
|
|
|
=pod |
|
|
|
=head2 NOTE: |
|
|
|
add_get_param() |
|
|
# Inputs are a url, and a hash ref of |
Inputs are a url, and a hash ref of |
# form name => value pairs |
form name => value pairs |
# takes care of properly adding the form name elements and values to the |
takes care of properly adding the form name elements and values to the |
# the url doing proper escaping of the values and joining with ? or & as |
the url doing proper escaping of the values and joining with ? or & as |
# needed |
needed |
|
|
|
=cut |
|
|
sub add_get_param { |
sub add_get_param { |
my ($url,$form_data) = @_; |
my ($url,$form_data) = @_; |
Line 209 sub propath {
|
Line 216 sub propath {
|
|
|
=pod |
=pod |
|
|
|
=out |
|
|
=item tie_domain_hash() |
=item tie_domain_hash() |
|
|
Manipulation of hash based databases (factoring out common code |
Manipulation of hash based databases (factoring out common code |
Line 230 Returns:
|
Line 239 Returns:
|
Reference to a hash bound to the db file or alternatively undef |
Reference to a hash bound to the db file or alternatively undef |
if the tie failed. |
if the tie failed. |
|
|
|
=back |
|
|
=cut |
=cut |
|
|
sub tie_domain_hash { |
sub tie_domain_hash { |
Line 253 sub untie_domain_hash {
|
Line 264 sub untie_domain_hash {
|
|
|
=pod |
=pod |
|
|
|
=out |
|
|
=item tie_user_hash() |
=item tie_user_hash() |
|
|
Ties a user's resource file to a hash. |
Ties a user's resource file to a hash. |
Line 273 Returns:
|
Line 286 Returns:
|
hash to which the database is tied. It's up to the caller to untie. |
hash to which the database is tied. It's up to the caller to untie. |
undef if the has could not be tied. |
undef if the has could not be tied. |
|
|
|
back |
|
|
=cut |
=cut |
|
|
sub tie_user_hash { |
sub tie_user_hash { |
Line 291 sub untie_user_hash {
|
Line 306 sub untie_user_hash {
|
|
|
=pod |
=pod |
|
|
|
=out |
|
|
=item locking_hash_tie() |
=item locking_hash_tie() |
|
|
routines if you just have a filename |
routines if you just have a filename |
return tied hashref or undef |
return tied hashref or undef |
|
|
|
=back |
|
|
=cut |
=cut |
|
|
sub locking_hash_tie { |
sub locking_hash_tie { |