$string = 'Hallo wie gehts ?';
if ($string=~/^(\w) /i) {
     $match = $1;
     print $match;
}