use Data::Dumper;
my @els = '[1,2,3]' =~ /(\w+)/g;
print Dumper \@els;