my $total_swap_mem = $v->{SizeStoredInPagingFiles}; my $free_swap_mem = $v->{FreeSpaceInPagingFiles}; my $used_swap_mem = $total_swap_mem - $free_swap_mem; my $used_swap_mem_perc = ($total_swap_mem - $free_swap_mem) / $total_swap_mem * 100; printf "Swap total:%d kb\n", $total_swap_mem; printf "Swap free:%d kb\n", $free_swap_mem; printf "Swap used:%d kb\n", $used_swap_mem; printf "Swap used:%.2f %%\n", $used_swap_mem_perc;