($hobbys) = $string =~ m/Hobbys: (\w+.*,\s)/;