Converting Text into Hours

Hello all
I am stuck and looking for some help please
Attached is the file. You will see in column A that I have a text value that is broken up in Days and Hours and I would like to convert it to hours in column B. I have somewhat of a formula but running into problems whenever the Day is greater than 1 character.....i.e 9 D to 10 D will not calculate incorrectly ( Cell A2 A141 A160 etc)

Thanks in advance