fork download
copy 
  1. #!perl -p
  2. s/("(\\.|[^"])+"|]$|^\[)|[][]/$1/g
  3.  
Success #stdin #stdout 0s 6000KB
comments (?)
stdin
copy 
[10,20,30]
[[10]]
[["Hi"],[[10]]]
[[[20],["Hi"],"Hi",20]]
[[["[]"],"[]"]]
[["\"Hi\""],[[10]]]
stdout
copy 
[10,20,30]
[10]
["Hi",10]
[20,"Hi","Hi",20]
["[]","[]"]
["\"Hi\"",10]
https://ideone.com/sBPlDe
http://c...content-available-to-author-only...e.com/q/80096
language:
Perl (perl 5.28.1)
created:
7 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!