passing array to a sub

pitbull3000 has asked for the wisdom of the Perl Monks concerning the following question:

i want to pass some scalars and an array to a sub, but how can get the values then

&example($scalar1, $scalar2, @info1);

sub example {
    $scalar1 = shift;$scalar2 = shift;@info1 = @_;
    .....
}
[download]

but unfortunately this isnt working...