1 2 3 4 5 6 7 8 9 10 11 12 13
package URI::rlogin; use strict; use warnings; our $VERSION = '1.71'; $VERSION = eval $VERSION; use parent 'URI::_login'; sub default_port { 513 } 1;