Help for this page
use strict; use warnings; ... my $file = "start<<<<part2>>>>middle<<<<part3>>>>end"; my @parts = split /<<<<(.+?)>>>>/, $file; print Dumper \@parts;
$VAR1 = [ 'start', ... 'part3', 'end' ];
www.com | www.net | www.org
No recent polls found