@Columbia_Crew = (
	'Rick D. Husband',
	'William C. McCool',
	'Michael P. Anderson',
	'David M Brown',
	'Kalpana Chawla',
	'Laurel Clark',
	'Ilan Ramon'
);


our $heroes = \@Columbia_Crew;

foreach $member ( @{$heroes} ) {
	print "God speed and well done, $member. You will be missed.\n";
}