Select Code to Download

Database Member 0 -- Active -- Up 26 days 13:26:26 -- Date 2020-07-10-
+10.11.32.332869

...
PRIVATE                1377280       1424640      843968
DB-PB1                23961536      24333568     2444864

>perl -nl db2mem.pl db2mem.PB1

...
FMP_RESOURCES            22          22          20
PRIVATE               1,345       1,391         824
DB-PB1               23,399      23,763       2,387

#use strict;
#use warnings;
...
($name, $used, $hwm, $free) =split /\s+/;
printf  "%-15s  %10s  %10s  %10s\n", $name, commify(int $used/1024), c
+ommify( int $hwm/1024), commify( int $free/1024);
}