Blame t/sample-tests/taint
|
Packit |
a6a12c |
#!/usr/bin/perl -Tw
|
|
Packit |
a6a12c |
|
|
Packit |
a6a12c |
use lib qw(t/lib);
|
|
Packit |
a6a12c |
use Test::More tests => 1;
|
|
Packit |
a6a12c |
|
|
Packit |
a6a12c |
eval { `$^X -e1` };
|
|
Packit |
a6a12c |
like( $@, '/^Insecure dependency/', '-T honored' );
|