Пример замены первой буквы в строке с нижнего регистра на верхний:
   $a =~ s/^(\w)(.*)$/uc($1).$2/e;