Select Code to Download

use strict;
my $SubRef = sub (\@$){
...
my @Array  = ("This ", "Is ", "A ", "Test ", ".");
my $Scalar = "That was a test.";
$SubRef->(@Array , $Scalar);

Can't use string ("This ") as an ARRAY ref while "strict refs" in use 
+at C:\Projects\test.pl line 5.

my $SubRef = sub ($$){

$SubRef->(\@Array , $Scalar);

my $SubRef = (\@$){