sidburn@sid:~/logs/orig/test$ perl -e '$a=12_111_222_333; $b=800_111_222_333; print $a + $b, "\n"'
812222444666