$test_hash{$switch_name}{'port_desc'} = 'Whatever';
  $test_hash{$switch_name}{'speed'} = 'auto';
  $test_hash{$switch_name}{'duplex'} = 'auto';
  $test_hash{$switch_name}{'reserve_status'} = 'active';
  $test_hash{$switch_name}{'port_vlan'} = '999';
  $test_hash_ref = \%test_hash;
    
  print qq~<input type=hidden name="test_ref" value="$test_hash_ref">\n~;