Guest User

Untitled

a guest
Jan 21st, 2018
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 3.91 KB | None | 0 0
  1. # add all of the prefix classes we know about to the set                                                                                                                                                                                                  
  2. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:902'],
  3.                                                                               name => 'non-I2 R&E' ) );
  4.  
  5. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:910'],
  6.                                                                               name => 'Sponsored Edu Groups' ) );
  7.  
  8. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:911'],
  9.                                                                               name => 'Black Hole' ) );
  10.  
  11. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:950'],
  12.                                                                               name => 'Internet2 Participants' ) );
  13.  
  14. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:2000'],
  15.                                                                               name => 'Commercial Research' ) );
  16.  
  17. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:2001'],
  18.                                                                               name => 'Special Commercial Prefix (V6/Multicast)' ) );
  19.  
  20. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:2500'],
  21.                                                                               name => 'non-International' ) );
  22.  
  23. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:2501'],
  24.                                                                               name => 'International' ) );
  25.  
  26. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:3000'],
  27.                                                                               name => 'FEDNET' ) );
  28.  
  29. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:3500'],
  30.                                                                               name => 'Connectors' ) );
  31.  
  32. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:4000'],
  33.                                                                               name => 'RHCPP' ) );
  34.  
  35. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:5000'],
  36.                                                                               name => 'Internet2 NET+ Services' ) );
  37.  
  38. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:5001'],
  39.                                                                               name => 'Telepresence' ) );
  40.  
  41. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11537:5002'],
  42.                                                                               name => 'Cloud' ) );
  43.  
  44. $prefix_class_set->add_prefix_class( GRNOC::I2FlowAnalysis::PrefixClass->new( communities => ['11164:7830',
  45.                                                                                               '11164:7790',
  46.                                                                                               '11164:7880',
  47.                                                                                               '11164:7890',
  48.                                                                                               '11537:25200'],
  49.                                                                               name => 'TR-CPS' ) );
Add Comment
Please, Sign In to add comment