use 5.10;
$ppp = $porter;
$ppp //= 0;