#!/usr/bin/perl -w
#######################################################
# lect09_split
#
# quick split command practice
#
# by Sharon Tuttle
#
# last modified: 10-19-04
#######################################################
my $string = "hello&dolly&well&hello dolly";
my @values = split /&/, $string;
foreach (@values)
{
print "<$_>\n";
}
# end of lect09_split