Select Code to Download

    my $data = {};
    foreach my $item ( @list )
...
    
    print 'data: ' . Dumper( $data );
}

data: $VAR1 = {
          'CS 128 Section 01 ' => {
...
                                    'Units' => '4'
                                  }
        };