my $str = "ello";
substr($str,0,0,"H");