Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid

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.

Comment on Re: Splitting a Text File
Select or Download Code

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 scrutinizing the Monastery: (4)
As of 2016-02-10 05:30 GMT
Find Nodes?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?

    Results (332 votes), past polls