title: Insecure $ENV{PATH} while running with -T switch
body: <p>I have code in perl module file.
  When I submit the button in web, I want to call an external script perl.
  Here is my code in perl module file.</p>
  <pre><code>package web::modify::send;
  use strict;
  
  use warnings FATAL =&gt; 'all';
  no warnings 'redefine';&lt;br&gt;
  sub send{
      my $s = shift;
      my $op = $s-&gt;param('Submit');
      eval {
          if ($op eq 'send') {
              system(&quot;./../bin/perl1.pl &gt;&gt; /log/file/perl1.log 2&gt;&amp;1 &amp;&quot;);
          }
      };
      return;
  }
  1;
  </code></pre>
  <p>And i have an warning like this:</p>
  <blockquote>
  <p>[Mon Feb 29 11:54:38 20] [warn] Insecure $ENV{PATH} while running with -T switch at /home/file/web/modify/send.pm line 1230.\n</p>
  </blockquote>