########### Code Segment ##############
my %data = (one => 1, two => 2, three => 3);
:
# XML stripped off here
:
print @info;				# Prints Listing 2
print %data;				# bottom of listing 2
%data = @info =~ /(\w+)\s*(\w+)/g;	# Line that gives error
print %data;				# Prints nothing
#######################################

### Listing 1 ###
<Position>      Stdnt</Position>
<GradYear>      1987</GradYear>
<WebPage>       http://</WebPage>
<E-mail>        SomeAddr@abc.com</E-mail>
<Comments>      Needs highschool yearbooks</Comments>

### Listing 2 ###
Position	Stdnt
GradYear	1987
WebPage	http://
Email		SomeAddr@abc.com
Comments	Needs highschool yearbooks
three3two2one1

### Error message ###
Applying pattern match to @array will act on scalar(@array) at e.pl line 29