summaryrefslogtreecommitdiff
path: root/ruby_1_8_6/ext/pty/expect_sample.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ruby_1_8_6/ext/pty/expect_sample.rb')
-rw-r--r--ruby_1_8_6/ext/pty/expect_sample.rb55
1 files changed, 0 insertions, 55 deletions
diff --git a/ruby_1_8_6/ext/pty/expect_sample.rb b/ruby_1_8_6/ext/pty/expect_sample.rb
deleted file mode 100644
index bf8a2352fe..0000000000
--- a/ruby_1_8_6/ext/pty/expect_sample.rb
+++ /dev/null
@@ -1,55 +0,0 @@
-#
-# sample program of expect.rb
-#
-# by A. Ito
-#
-# This program reports the latest version of ruby interpreter
-# by connecting to ftp server at ruby-lang.org.
-#
-require 'pty'
-require 'expect'
-
-fnames = []
-PTY.spawn("ftp ftp.ruby-lang.org") do |r_f,w_f,pid|
- w_f.sync = true
-
- $expect_verbose = false
-
- r_f.expect(/^Name.*: /) do
- w_f.print "ftp\n"
- end
-
- if !ENV['USER'].nil?
- username = ENV['USER']
- elsif !ENV['LOGNAME'].nil?
- username = ENV['LOGNAME']
- else
- username = 'guest'
- end
-
- r_f.expect('word:') do
- w_f.print username+"@\n"
- end
- r_f.expect("> ") do
- w_f.print "cd pub/ruby\n"
- end
- r_f.expect("> ") do
- w_f.print "dir\n"
- end
-
- r_f.expect("> ") do |output|
- for x in output[0].split("\n")
- if x =~ /(ruby.*\.tar\.gz)/ then
- fnames.push $1
- end
- end
- end
- begin
- w_f.print "quit\n"
- rescue
- end
-end
-
-print "The latest ruby interpreter is "
-print fnames.sort.pop
-print "\n"