The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

CGI::Untaint::Winfilename - CGI::Untaint::Winfilename - untaint Windows filename values from CGI programs

SYNOPSIS

  use CGI::Untaint::Winfilename;
  my $handler = CGI::Untaint->new( $q->Vars() );
  my $filename = $handler->extract( -as_winfilename => 'some_feature' );

DESCRIPTION This input handler verifies that it has a a valid (Windows) filename. It provides the regex and a subroutine for a handler. Extensive test cases are provided.

INSTALLATION

perl Build.PL ./Build ./Build test ./Build install

BUGS

While it is valid to end a UNIX filename with \# ! and % I haven't got those incorporated into the regular expression. Test cases exist but are currently commented out.

Please report any fixes and other bugs to http://rt.cpan.org/.

SUPPORT

Bug reports welcome, see above.

AUTHOR

        Dana Hudes
        CPAN ID: DHUDES
        dhudes@hudes.org
        http://www.hudes.org

COPYRIGHT

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

perl(1). CGI::Untaint, CGI::Untaint::Filenames, Test::CGI::Untaint

Rules Two groups of characters: those valid anywhere and those valid only at the end of the string.