1 2 3 4 5 6 7 8 9 10 11 12
package URI::tn3270; use strict; use warnings; our $VERSION = "1.69"; use parent 'URI::_login'; sub default_port { 23 } 1;