my @showheaders = ("Section ID", "Course Title", "Grade", "Earned<br />Hours", "Quality<br />Hours", "Quality<br />Points");
#$file = shift unless (!defined $_[0] or $_[0] =~ /^\d/);
$grades = get_grades(@_);
my @showheaders = ("Section ID", "Course Title", "Grade", "Earned<br />Hours", "Quality<br />Hours", "Quality<br />Points");
#$file = shift unless (!defined $_[0] or $_[0] =~ /^\d/);
$grades = get_grades(@_);