$mode       =~ tr#a-z_##cd;   # untaint that param!