$totcalls += $layer3 =~ /^([0-9]*)/ && $1;
[download]

or better yet

$totcalls += do { no warnings 'numeric'; 0+$layer3 };
[download]

Your s/// will never match because it's modifying $totcalls after the sum-assign (i.e when it contains a number).