Perl 131 connect option