Select Code to Download

#!/usr/bin/perl -wT

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

#!/usr/bin/perl -wT

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