`t/taint.t` detection will be insufficient in upcoming blead

[leonerd]

Currently this test detects whether taint is available in the Perl by looking for a symbol in ccflags:

$Config{ccflags} =~ /-DSILENT_NO_TAINT_SUPPORT/

Upcoming changes aim to get around to adding a proper ./Configure script option and Config.pm support for this.

I have a modified version of this test for development purposes in which this code works:

# perl 5.45.2 adds the 'usetaint' Config key
use Test::More 
    ( exists $Config{usetaint} ? !$Config{usetaint} :
                                 $Config{ccflags} =~ /-DSILENT_NO_TAINT_SUPPORT/ )
    ? ( skip_all => 'No taint support' ) : ( tests => 2 );

If Perl/perl5#24640 gets merged, then this code ought to be updated to that.

[Leont]

In File::Map, I just went for this instead:

use Scalar::Util qw/tainted/;
plan skip_all => 'No taint support' if not tainted($0);