Select Code to Download

use Net::Telnet();
package Switch;
...
}

1;

use Switch;
use strict;
use warnings;
my $switch = Switch -> new();