$restLength = length(@rest);

##</code><code>##

$restLength = scalar @rest;

##</code><code>##

for my $item (@rest) {
  print "$item":
}