$_POST['name']

\n"; if (isset($_POST['type'])) { if ($_POST['type'] == 'begin') { displayBegin(); } else if ($_POST['type'] == 'end') { displayEnd(); } else { print "bad type: $_POST['type']
\n"; } } else { print "bad type: -no type parameter-
\n"; } function displayEnd(){ print "

Results from the End of the Star Life Cycle activity.

"; $num_stars = 4; $_POST['star0final_state'] = 'Brown Dwarf'; for($i=0; $i<$num_stars; $i++) { //LEFT OFF HERE $stars[$i]={name => (exists $vars{'star'.$i.'name'}) ? $vars{'star'.$i.'name'} : '-', red_giant => (exists $vars{'star'.$i.'reach_redgiant'}) ? $vars{'star'.$i.'reach_redgiant'} : '-', nebula => (exists $vars{'star'.$i.'reach_nebula'}) ? $vars{'star'.$i.'reach_nebula'} : '-', supernova => (exists $vars{'star'.$i.'reach_supernova'}) ? $vars{'star'.$i.'reach_supernova'}:'-', final_state => (exists $vars{'star'.$i.'final_state'}) ? $vars{'star'.$i.'final_state'}:'-' }; } foreach(@stars){ print '\n"; while (($key, $value) = each(%$_)) { $key =~ tr/_/ /; $value =~ tr/_/ /; print '\n"; } print"
'; my ($key, $value) = each(%$_); $key =~ tr/_/ /; $value =~ tr/_/ /; print"Star: $value
',"$key$value

\n"; } } function displayBegin(){ print "

Results from the Beginning of the Star Life Cycle activity.

"; my @stars; my $num_stars = 4; foreach my $i (0..$num_stars-1) { $stars[$i]={name => (exists $vars{'star'.$i.'name'}) ? $vars{'star'.$i.'name'} : '-', reach_main_seq => (exists $vars{'star'.$i.'reach_main'}) ? $vars{'star'.$i.'reach_main'} : '-', length_main_seq => (exists $vars{'star'.$i.'length_main'}) ? $vars{'star'.$i.'length_main'} : '-' }; } foreach(@stars){ print '\n"; my ($key, $value) = each(%$_); while (($key, $value) = each(%$_)) { $key =~ tr/_/ /; $value =~ tr/_/ /; print '\n"; } print"
'; my $name = $$_{'name'}; print"Star: $name
',"$key$value

\n"; } } ?>

You can print this page out to hand it in.