Perl Diver 2.33
Main Environment Variables Perl Default Values Perl Config - Summary Perl Config - Full Installed Modules List Directory uptime Docs

Module Documentation
Details and documentation about a specific module, including version and documentation (if available). Note that while links to perldoc.com and search.cpan.org are provided, the module may be part of a larger distribution. If you reach a File Not Found page on either site, please try the parent module.

CGI::Untaint::object

Name CGI::Untaint::object
Version
Located at /usr/share/perl5
File /usr/share/perl5/CGI/Untaint/object.pm
Is Core No
Search CPAN for this module CGI::Untaint::object
Documentation CGI::Untaint::object
Module Details CGI::Untaint::object

NAME

CGI::Untaint::object - base class for Input Handlers


SYNOPSIS

  package MyUntaint::foo;
  use base 'CGI::Untaint::object';
  sub _untaint_re {
    return qr/$your_regex/;
  }
  sub is_valid {
    my $self = shift;
    return is_ok($self->value);
  }
  1;


DESCRIPTION

This is the base class that all Untaint objects should inherit from.


METHODS TO SUBCLASS

is_valid / _untaint_re

Your subclass should either provide a regular expression in _untaint_re (and yes, I should really make this public), or an entire is_valid method.


METHODS TO CALL

value

This should really have been two methods, but too many other modules now rely on the fact that this does double duty. As an accessor, this is the 'raw' value. As a mutator it's the extracted one.

re_all / re_none

Regular expressions to match anything, or nothing, untained. These should only be used if you have already validated your entry in some way that means you completely trust the data.

untainted

Are we clean yet?

Perl Diver brought to you by ScriptSolutions.com © 1997- 2026