sub sumit {
        my $sum = 0;
        $sum += pop // return $sum while 1;
}