Select Code to Download

  my $baseoid = ".1.3.6.1.2.1.2.2"; # ifTable
  my $thisoid = $baseoid;
...

    print( "@{$thisoid}\n" );
  }