Perl——正则表达式(五) split

一. 介绍

split /regex/, string

使用它进行分割

二. 实例

(1) 以空格分割

$x = "Calvin and Hobbes";
@word = split /\s+/, $x; # $word[0] = 'Calvin'
			 # $word[1] = 'and'
			 # $word[2] = 'Hobbes'

(2)

 $x = "1.618,2.718, 3.142";
 @const = split /,\s*/, $x; # $const[0] = '1.618'
                            # $const[1] = '2.718'
                            # $const[2] = '3.142'

(3)

$x = "/usr/bin";
@parts = split m!(/)!, $x;  # $parts[0] = ''
			    # $parts[1] = '/'
			    # $parts[2] = 'usr'
			    # $parts[3] = '/'
			    # $parts[4] = 'bin'