Select Code to Download

$ perl -le'
use warnings;
...
false
$regex = (?-xism:[3]{0})
true

$ perl -le'$x = () = "2020" =~ /[1]{0}/g; print $x'
5