>perl -e "print 1 . '1' + '.01'"
11.01

##</code><code>##

>perl -e "print str2num(num2str(1) . '1') + str2num('.01')"