$totalmarks = 0;
$totalmarks += $_ for (@marks);