path: root/ext/Test-Harness/t/sample-tests/taint

#!/usr/bin/perl -Tw

use lib qw(t/lib);
use Test::More tests => 1;

eval { `$^X -e1` };
like( $@, '/^Insecure dependency/', '-T honored' );