$ 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.
$