Perl had an interesting invention - taint mode (although much later). All inputs from the network were marked as tainted and you got an error if you tried to us

Perl had an interesting invention - taint mode (although much later). All inputs from the network were marked as tainted and you got an error if you tried to use I/O with them. You had to untaint the data by passing to if/case statement or at least a regex. IMO when programmer did not fight it, it was very good for sanitizing the input. Curious why this did not get more widely adopted?