Select Code to Download

my @coursename;
my @c_arr ;# Course array
...
    }
  }
}

   # value surrounded with <   > to make it easier to see
   # empty strings
   print STDERR "token[1]=<"
      .  (defined($token->[1]) ? $token->[1] : 'undef')
      . ">\n";