Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Splitting a Text File

by hdb (Prior)
on Jul 26, 2013 at 16:45 UTC ( #1046559=note: print w/replies, xml ) Need Help??

in reply to Splitting a Text File

If you use parentheses in the separator given to split, the captured string will also be part of the resulting array. See this example:

use strict; use warnings; use Data::Dumper; my $file = "start<<<<part2>>>>middle<<<<part3>>>>end"; my @parts = split /<<<<(.+?)>>>>/, $file; print Dumper \@parts;

which results in

$VAR1 = [ 'start', 'part2', 'middle', 'part3', 'end' ];

and gives you the content for your splitted files and the names in alternation.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1046559]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (9)
As of 2016-10-25 10:47 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (317 votes). Check out past polls.