##!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
use Getopt::Long;

my @array;

GetOptions ( 
                    "prueba2=s" => \@array,

 ) or die "not working: $!\n";

print "@array\n";

exit;