use strict;
use warnings;
use Getopt::Long;

my @test;
GetOptions( 'test=s{3}' => \@test );
sub sub1 { print "@_" };
sub1 @test if @test;