Help for this page

Select Code to Download


  1. or download this
    $ perl -TE 'say $^V; say qq/Taint mode: ${^TAINT}/; say qx/date/'
v5.34.0
Taint mode: 1
Insecure $ENV{PATH} while running with -T switch at -e line 1.
$
  2. or download this
    $ perl -E 'say $^V; say qq/Taint mode: ${^TAINT}/; system q/date/'
v5.34.0
...
Taint mode: 1
Insecure $ENV{PATH} while running with -T switch at -e line 1.
$