sub somesub {
   my ($first, $second, @list) = @_
   foreach my $element (@list) {
      # do something, possibly intelligent
   }
}