NAME

Taint::Util - Test and flip the taint flag on scalars without regex matches or eval

SYNOPSIS

use Taint::Util;

my $sv = "pis";

taint $sv; # Now tainted

untaint $sv if tainted $sv;

# $sv now untainted again

DESCRIPTION

Wraps perl's internal routines for checking and setting the taint flag and thus does not rely on regular expressions for untainting but flipping a flag on the scalar in-place.

Provides three functions, tainted which returns a boolean indicating whether a scalar is tainted and taint and untaint which always return false and are no-ops if tainting is disabled.

EXPORTS

Exports tainted, taint and untaint by default. Individual functions can be exported by specifying them in the use list, to export none use ().

AUTHOR

Ævar Arnfjörð Bjarmason <avar@cpan.org>

LICENSE

Copyright 2007 Ævar Arnfjörð Bjarmason.

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