1N/A#!/usr/bin/perl -tw
1N/A
1N/Ause lib qw(t/lib);
1N/Ause Test::More tests => 1;
1N/A
1N/Amy $warnings = '';
1N/A{
1N/A local $SIG{__WARN__} = sub { $warnings .= join '', @_ };
1N/A kill 0, $^X;
1N/A}
1N/Alike( $warnings, '/^Insecure dependency/', '-t honored' );