(@junk, $ads) = (split(/\s+/, $rec));
# the same here
(@foo, $bar) = @baz;

# only this way it works
($first,$second,@remaining) = @all