Perl:Split a String

Perl:String Functions

Contains

Ends With

Equal Strings

Find Position

Formatting

Using Print Formatting

Lower Case

Join Strings

Starts With

String Length

Special Characters

Split a String

Substring

Upper Case

You can use split to break a single string into an array of strings.

split

You can specify the string that delimits. split(' ',$s) will split the string $s on every run of space characters.

.

#!/usr/bin/perl use strict; my $s = "zero one two three"; my @a = split(' ',$s); print length(@a)."\n"; print $a[0]."\n"; print $a[1]."\n"; print $a[2]."\n";

[Font] [Default] [Show] [Resize] [History] [Profile]

test text

 

 

 

 

split on regular expression

You can use a regular expression. /\s+/ will match one or more consecutive white space characters - including tabs and line end markers.

.

#!/usr/bin/perl use strict; my $s = "zero \none\ttwo three"; my @a = split(/\s+/,$s); print length(@a)."\n"; print $a[0]."\n"; print $a[1]."\n"; print $a[2]."\n";

[Font] [Default] [Show] [Resize] [History] [Profile]

test text