#!/usr/bin/perl -wT

use strict;
use File::Find;

$ENV{PATH} = "/bin:/usr/bin";
$ENV{ENV} = "";

# This produces "Insecure dependency in chdir while running with -T
# switch"
find( sub { print }, "." );

##</code><code>##

#!/usr/bin/perl -wT

use strict;
use Cwd;

$ENV{PATH} = "/bin:/usr/bin";
$ENV{ENV} = "";

# This produces "Insecure dependency in system while running with -T
# switch"
system "ls " . cwd();