Updated as per GrandFather's correction.my $foo = 'c:\temp\source\test\test.c@@main\com\etc c:\temp\source\tes +t\test1.c@@main\com\test c:\temp\source\test\test3\test2.c@@main\com\ +etc\test'; my @bits = split /\@\@.*?(?: c:\\temp|$)/, $foo; print "$_\n" for @bits;
In reply to Re: Dealing with split
by Roy Johnson
in thread Dealing with split
by perl_99_monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |