my $foo = <<HERE :TAG:This is just some text. blahblahblahblahblahblahblah blahblahblah +. blahblah? blah.:TAG:This is just some text. blahblahblahblahblahblahb +lah blahblahblah. blahblah? blah. :TAG:This is just some text. blahblahblahblahblahblah +blah blahblahblah. blahblah? blah. :TAG:This is just some more text. blahblahblahblahblahblahblah blahblahblah. blahblah? blah. HERE ; @foo = split /(:TAG:)/,$foo; print join "\n",@foo
In reply to Re: Splitting and maintaining the delimiter
by boo_radley
in thread Splitting and maintaining the delimiter
by Rich36
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |