xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/lib/sample-tests/taint (revision 0:68f95e015346)
1#!/usr/bin/perl -Tw
2
3use lib qw(t/lib);
4use Test::More tests => 1;
5
6eval { kill 0, $^X };
7like( $@, '/^Insecure dependency/',   '-T honored' );
8