String Splitting by letters in Perl

Question

I am new to Perl and I am currently trying to split a string only on a couple of letter. I have looked at the other answers and they seem to be specific to that problem or there is lack of comments to understand the answer.

The ultimate goal is to split up a very long CSV file into receptive sections which can then be used later on. The sample data would is

HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />

I would look to split the string by the "< br /> into there own strings which would then store the strings in an array. So far what I have tried to split the string is:

my $line1 = split("/<br />", $Line);

and testing it trying by printing out the output, but it doesn't work.

daxim · Accepted Answer · 2012-08-01 12:53:52Z

7

The split function returns the number of splits in scalar context. To get the list of splits, one needs to call split in list context:

my $str   = q{HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />};
my @lines = split qr{<br\s?/>}, $str;

edited Aug 1, 2012 at 12:53

daxim

39.3k4 gold badges71 silver badges135 bronze badges

answered Aug 1, 2012 at 12:24

Alan Haggai Alavi

74.7k19 gold badges105 silver badges129 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

daxim · Accepted Answer · 2012-08-01 12:51:48Z

3

$str = 'HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />HOME 123454 monkey lion 6.4.2.10 ( ABCD EFGH (Tue 20th August 2000) 12345 True )<br />';

my @list = split(qr'<br />', $str);

say $_ for @list;

edited Aug 1, 2012 at 12:51

daxim

39.3k4 gold badges71 silver badges135 bronze badges

answered Aug 1, 2012 at 12:19

BSen

1972 silver badges16 bronze badges

Collectives™ on Stack Overflow

String Splitting by letters in Perl

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related