Select Code to Download

my ($size)   = $vmsize =~ /VmSize:\s+(.*)$/;

  (my $vmsize) = grep {/VmSize/} @size;
   my (undef,$size) = split "\t",$vmsize;