1CGI::Untaint::Maypole(3U)ser Contributed Perl DocumentatiCoGnI::Untaint::Maypole(3)
2
3
4

NAME

6       CGI::Untaint::Maypole - Use instead of CGI::Untaint. Based on
7       CGI::Untaint
8

SYNOPSIS

10         use CGI::Untaint::Maypole;
11         my $h = CGI::Untaint::Maypole->new($params);
12         $value = $h->extract(-as_printable => 'name);
13
14         if ($h->error =~ /No input for/) {
15               # caught empty input now handle it
16                       ....
17         }
18         if ($h->raw_data->{$field} eq $object->$field) {
19           # Raw data same as database data. Perhaps we should not update field
20               ...
21         }
22

DESCRIPTION

24       This patches some issues I have with CGI::Untaint. You still need it
25       installed and you install handlers the same.
26
27       1) Instead of passing the empty string to the untaint handlers and
28       relying on them to handle it to everyone's liking, it seems better to
29       have CGI::Untaint just say "No input for field" if the field is blank.
30
31       2) It  adds the method "raw_data" to the get back the parameters the
32       handler was created with.
33
34       raw_data
35
36       Returns the parameters the handler was created with as a hashref
37

BUGS

39       None known yet.
40

SEE ALSO

42       perlsec. CGI::Untaint.
43

AUTHOR

45       Peter Speltz.
46

BUGS and QUERIES

48       Please direct all correspondence regarding this module to:
49          bug-Maypole@rt.cpan.org
50

52       Copyright (C) 2006 Peter Speltz.  All rights reserved.
53
54       This module is free software; you can redistribute it and/or modify it
55       under the same terms as Perl itself.
56
57
58
59perl v5.8.8                       2005-11-23          CGI::Untaint::Maypole(3)
Impressum