#perl -e '$_="1aa23.4a";$_=~s/[a-f]//gi;print "$_\n"'
123.4
#