my $var = $&; my $key = $var; substr($key, 0, 1) = "";