$data =~ s/[\[\]]//g;