Select Code to Download

my $totmem = $OVERALL_MEM =~ /(\d+)/;

my ($totmem) = $OVERALL_MEM =~ /(\d+)/;

use warnings;
use strict;
...

totmem is : 148704012