C:\>perl $string1 = "20"; $string2 = "30"; print eval($string1+$string2); ^D 50 C:\>