$ perl -E 'say $^V; say qq/Taint mode: ${^TAINT}/; say qx/date/'
v5.34.0
Taint mode: 0
Thu 26 Oct 09:57:36 BST 2023

$