Yes, it's a string, so I ought to be able to do what you suggest... however that regexp doesn't seem to match my string. I threw together the following to test it:

$string = "
blah



@QUERY
meaningful data
meaningful data
... etc...
@ENDQUERY

@QUERY2
more data
more data
... etc ...
@ENDQUERY2";

print "string1: $string\n\n";

$string =~ s[(?:\r?\n\s*)+(\@QUERY)][\n$1]g;

print "string2: $string\n\n";'
[download]

And my output is something like this. Can you help me tweak the regexp?

string1:
blah




meaningful data
meaningful data
... etc...



more data
more data
... etc ...


string2:
blah




meaningful data
meaningful data
... etc...



more data
more data
... etc ...
[download]

Thanks,

AH

P.S. bart I'm looking at ".." and it seems very powerful... I may end up using it, once get my head around it.

Using perl 5.6.1 unless otherwise noted.
Apache 1.3.27 unless otherwise noted.
Redhat 7.1 unless otherwise noted.
[download]