'c|lower-case' => sub { push @perlexpr, 'tr/A-Z/a-z/' },
'C|upper-case' => sub { push @perlexpr, 'tr/a-z/A-Z/' },
'z|sanitize'   => sub { push @perlexpr, 'tr/A-Za-z0-9\.\-/_/cs' },