in reply to multiline, global regex
Try to use join, it is more convenient than a loop:
Why not use Parse:RecDescent for the parsing?my $string = join '', @temparray; # or even <FILE>
Otherwise, you can trim some delimiters down, as you do not really need the closing brackets.
Does a decent try at breaking it down, although the code above is a bit rough. RecDescent would be better. Take a look at perlref, perldsc, perllol and perlreftut, you can find a link of the latter in my homenode.use SuperSplit; $string =~ tr/}//d; $nested_list = supersplit( ';','{',' ','\n','\n\n', $string );
This post would be longer, but I have to celebrate now...
Jeroen
"We are not alone"(FZ)
Update: forgot to add the whiteline
|
|---|