All parameters passed via  @_ are passed by reference; it's Perl's normal way of doing business. Consider:

>perl -wMstrict -le
"my $i = 42;
 inc($i);
 print $i;
 sub inc { ++$_[0] }
"
43
[download]

See the third paragraph in the DESCRIPTION section of perlsub.