#!/usr/bin/perl -w

#######################################################
# class6_07_split_ex
#
# example of split operator
#
# last modified: 4-28-03
#######################################################

# @line_vals has a separate value for each value after a : 
@line_vals = split /:/, "the rain:in Spain:stays mainly:in the plain"; 
 
foreach $val (@line_vals) 
{ 
    print "NEXT LINE VAL:$val\n"; 
} 


# end of class6_08_split_ex