Date: Fri, 17 Jan 2003 15:48:20 -0800 From: "Koyabu, Ken" <ken.koyabu@dli.net> To: "'questions@FreeBSD.org'" <questions@FreeBSD.org> Cc: "Koyabu, Ken" <ken.koyabu@dli.net> Subject: Question Regarding Kerberos Message-ID: <953B9655BA44D5119D1E00508BE27C155AC2F6@DLIEXC00>
next in thread | raw e-mail | index | archive | help
Hi, I need some help. I'm running FreeBSD 4.5-RELEASE version. I ported the following perl script from the system running FreeBSD 2.2.7-RELEASE. (the perl script works fine on FreeBSD 2.2.7.) But, when I execute this perl script on FreeBSD 4.5, it fails with the following messages: open2: exec of socket 140.237.253.1 23 failed at /opr/get line 23 I'm using stable perl 5.6.1 on FreeBSD 4.5 server. Here is the actual perl script which I'm trying to run: ---------------------------------------------------------------------------- --------------------------------- #!/usr/local/bin/perl use FileHandle; use IPC::Open2; require 'getopt.pl'; do Getopt("s"); $line=1; $skip_to = $opt_s; while(<>) { chop; next if /^#/; next if /^\s*$/; ($name,$ip,$login,$pass,$pass2) = split; next if $line++ < $skip_to; print "$name\n"; $pid = open2 ( \*TELNET_IN , \*TELNET_OUT, "socket $ip 23" ); <<< FAILED AT THIS LINE #23 sleep 10; # give it some time to connect to the host print TELNET_OUT $login,"\n"; sleep 10; # wait for response print TELNET_OUT "$pass\n"; sleep 10; and so on................ ---------------------------------------------------------------------------- --------------------------------- When I tried to telnet to one of Cisco router, I got this messages which I do not see when I telnet from older version of FreeBSD server. login: Kerberos: No default realm defined for Kerberos! I could still manually telnet & logged on the router, but I never saw "Kerberos" message at telnet login before with older FreeBSD. The reason socket can not be executed from this perl scrip is...because of "kerberos"? I may installed Kerberos option at installation time, but I don't think I turned on kerberos for authentication. I really do not need kerberos, so I would like to turn it off if it's possible, and I need to make this perl script to work on FreeBSD 4.5 environment. I would really appreciate your help. Regards, Ken To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-questions" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?953B9655BA44D5119D1E00508BE27C155AC2F6>