You cannot unless you like jumping through a lot of hoops or using prototypes. Using references is the canonical way of doing this.

If you would try prototypes (and you really do not want to do that unless you know pretty well what you are doing) you can try this:

use Modern::Perl;

sub no_ref(\@\@) {
    my ($first, $second) = @_;
    say "First:  @$first";
    say "Second: @$second";
}

my @alfa = (1 .. 10);
my @beta = ('a' .. 'j');

no_ref @alfa, @beta;
[download]

Output:

First:  1 2 3 4 5 6 7 8 9 10
Second: a b c d e f g h i j
[download]

It still uses references, but they are kind of hidden. And you cannot call the subroutine with &no_ref!