1
Author: Mike Markley <mike@markley.org>
2
Description: Fixes shebangs in examples (Closes: #152367).
4
diff -Naurp expect.orig/example/archie expect/example/archie
5
--- expect.orig/example/archie 2009-08-03 06:58:30.000000000 +0000
6
+++ expect/example/archie 2009-08-03 08:31:41.000000000 +0000
13
diff -Naurp expect.orig/example/autoexpect expect/example/autoexpect
14
--- expect.orig/example/autoexpect 2009-08-03 06:58:30.000000000 +0000
15
+++ expect/example/autoexpect 2009-08-03 08:31:41.000000000 +0000
19
# Name: autoexpect - generate an Expect script from watching a session
22
diff -Naurp expect.orig/example/autopasswd expect/example/autopasswd
23
--- expect.orig/example/autopasswd 2009-08-03 06:58:30.000000000 +0000
24
+++ expect/example/autopasswd 2009-08-03 08:31:41.000000000 +0000
28
# wrapper to make passwd(1) be non-interactive
29
# username is passed as 1st arg, passwd as 2nd
31
diff -Naurp expect.orig/example/beer.exp expect/example/beer.exp
32
--- expect.orig/example/beer.exp 2009-08-03 06:58:30.000000000 +0000
33
+++ expect/example/beer.exp 2009-08-03 08:31:41.000000000 +0000
35
-#!/depot/path/expect -f
38
# 99 bottles of beer on the wall, Expect-style
39
# Author: Don Libes <libes@nist.gov>
40
diff -Naurp expect.orig/example/chess.exp expect/example/chess.exp
41
--- expect.orig/example/chess.exp 2009-08-03 06:58:30.000000000 +0000
42
+++ expect/example/chess.exp 2009-08-03 08:31:41.000000000 +0000
46
# expect script to connect two UNIX chess programs together.
47
# written by Don Libes - May 9, 1990
49
diff -Naurp expect.orig/example/cryptdir expect/example/cryptdir
50
--- expect.orig/example/cryptdir 2009-08-03 06:58:30.000000000 +0000
51
+++ expect/example/cryptdir 2009-08-03 08:31:41.000000000 +0000
56
# Author: Don Libes, NIST
58
diff -Naurp expect.orig/example/decryptdir expect/example/decryptdir
59
--- expect.orig/example/decryptdir 2009-08-03 06:58:30.000000000 +0000
60
+++ expect/example/decryptdir 2009-08-03 08:31:41.000000000 +0000
65
# Author: Don Libes, NIST
67
diff -Naurp expect.orig/example/dislocate expect/example/dislocate
68
--- expect.orig/example/dislocate 2009-08-03 06:58:30.000000000 +0000
69
+++ expect/example/dislocate 2009-08-03 08:31:41.000000000 +0000
73
# dislocate - allow disconnection and reconnection to a background program
74
# Author: Don Libes, NIST
76
diff -Naurp expect.orig/example/dvorak expect/example/dvorak
77
--- expect.orig/example/dvorak 2009-08-03 06:58:30.000000000 +0000
78
+++ expect/example/dvorak 2009-08-03 08:31:41.000000000 +0000
82
# simulate a dvorak keyboard
83
# Actually just the lowercase letters are mapped to show the basic idea.
84
# Really, uppercase and control should probably be mapped too.
85
diff -Naurp expect.orig/example/expectd.proto expect/example/expectd.proto
86
--- expect.orig/example/expectd.proto 2009-08-03 06:58:30.000000000 +0000
87
+++ expect/example/expectd.proto 2009-08-03 08:31:41.000000000 +0000
89
-#!/depot/tcl/src/expect/e --
90
+#!/usr/bin/expectk -f
91
# Description: Simple fragment to begin a telnet daemon
92
# For more information, see Chapter 17 of "Exploring Expect"
93
# Author: Don Libes, NIST
94
diff -Naurp expect.orig/example/ftp-inband expect/example/ftp-inband
95
--- expect.orig/example/ftp-inband 2009-08-03 06:58:30.000000000 +0000
96
+++ expect/example/ftp-inband 2009-08-03 08:31:41.000000000 +0000
100
# ftp-inband - copy files over a telnet/rlogin/etc link
101
# Author: Don Libes, NIST
103
diff -Naurp expect.orig/example/ftp-rfc expect/example/ftp-rfc
104
--- expect.orig/example/ftp-rfc 2009-08-03 06:58:30.000000000 +0000
105
+++ expect/example/ftp-rfc 2009-08-03 08:31:41.000000000 +0000
108
+#!/usr/bin/expect --
110
# ftp-rfc <rfc-number>
112
diff -Naurp expect.orig/example/gethostbyaddr expect/example/gethostbyaddr
113
--- expect.orig/example/gethostbyaddr 2009-08-03 06:58:30.000000000 +0000
114
+++ expect/example/gethostbyaddr 2009-08-03 08:31:41.000000000 +0000
117
+#!/usr/bin/expect --
119
# gethostbyaddr a.b.c.d - translate an internet address to a FQDN,
120
# guessing (a lot) if necessary.
121
diff -Naurp expect.orig/example/irsh expect/example/irsh
122
--- expect.orig/example/irsh 2009-08-03 06:58:30.000000000 +0000
123
+++ expect/example/irsh 2009-08-03 08:31:41.000000000 +0000
125
-#!/depot/path/expect --
126
+#!/usr/bin/expect --
128
# Do rsh interactively. For example, consider the following command:
129
# rsh <remote> ls -l "|" more
130
diff -Naurp expect.orig/example/kibitz expect/example/kibitz
131
--- expect.orig/example/kibitz 2009-08-03 06:58:30.000000000 +0000
132
+++ expect/example/kibitz 2009-08-03 08:31:41.000000000 +0000
135
+#!/usr/bin/expect --
136
# allow another user to share a shell (or other program) with you
137
# See kibitz(1) man page for complete info.
138
# Author: Don Libes, NIST
139
diff -Naurp expect.orig/example/lpunlock expect/example/lpunlock
140
--- expect.orig/example/lpunlock 2009-08-03 06:58:30.000000000 +0000
141
+++ expect/example/lpunlock 2009-08-03 08:31:41.000000000 +0000
144
+#!/usr/bin/expect -f
146
# This script unhangs a printer which claims it is "waiting for lock".
147
# Written by Don Libes. Based on English instructions from Scott Paisley.
148
diff -Naurp expect.orig/example/mkpasswd expect/example/mkpasswd
149
--- expect.orig/example/mkpasswd 2009-08-03 06:58:30.000000000 +0000
150
+++ expect/example/mkpasswd 2009-08-03 08:31:41.000000000 +0000
152
-#!/depot/path/expect --
153
+#!/usr/bin/expect --
154
# mkpasswd - make a password, if username given, set it.
155
# Author: Don Libes, NIST
157
diff -Naurp expect.orig/example/multixterm expect/example/multixterm
158
--- expect.orig/example/multixterm 2009-08-03 06:58:30.000000000 +0000
159
+++ expect/example/multixterm 2009-08-03 08:31:41.000000000 +0000
161
-#!/depot/path/expectk
165
# multixterm - drive multiple xterms separately or together
166
diff -Naurp expect.orig/example/passmass expect/example/passmass
167
--- expect.orig/example/passmass 2009-08-03 06:58:30.000000000 +0000
168
+++ expect/example/passmass 2009-08-03 08:31:41.000000000 +0000
171
+#!/usr/bin/expect --
172
# passmass: change password on many machines
173
# Synopsis: passmass host1 host2 host3 ....
174
# Don Libes - March 11, 1991
175
diff -Naurp expect.orig/example/passwd.cgi expect/example/passwd.cgi
176
--- expect.orig/example/passwd.cgi 2009-08-03 06:58:30.000000000 +0000
177
+++ expect/example/passwd.cgi 2009-08-03 08:31:41.000000000 +0000
179
-#!/depot/path/expect --
180
+#!/usr/bin/expect --
182
# This is a CGI script to process requests created by the accompanying
183
# passwd.html form. This script is pretty basic, although it is
184
diff -Naurp expect.orig/example/passwdprompt expect/example/passwdprompt
185
--- expect.orig/example/passwdprompt 2009-08-03 06:58:30.000000000 +0000
186
+++ expect/example/passwdprompt 2009-08-03 08:31:41.000000000 +0000
188
-#!/depot/path/expect
191
# This script prompts for a passwd from stdin while echoing *'s
193
diff -Naurp expect.orig/example/read1char expect/example/read1char
194
--- expect.orig/example/read1char 2009-08-03 06:58:30.000000000 +0000
195
+++ expect/example/read1char 2009-08-03 08:31:41.000000000 +0000
198
+#!/usr/bin/expect --
200
# read a single character
201
# Author: Don Libes, NIST
202
diff -Naurp expect.orig/example/reprompt expect/example/reprompt
203
--- expect.orig/example/reprompt 2009-08-03 06:58:30.000000000 +0000
204
+++ expect/example/reprompt 2009-08-03 08:31:41.000000000 +0000
206
-#!/depot/path/expect --
207
+#!/usr/bin/expect --
210
# Description: reprompt every so often until user enters something
211
diff -Naurp expect.orig/example/rftp expect/example/rftp
212
--- expect.orig/example/rftp 2009-08-03 06:58:30.000000000 +0000
213
+++ expect/example/rftp 2009-08-03 08:31:41.000000000 +0000
216
+#!/usr/bin/expect -f
217
# rftp - ftp a directory hierarchy (i.e. recursive ftp)
220
diff -Naurp expect.orig/example/rlogin-cwd expect/example/rlogin-cwd
221
--- expect.orig/example/rlogin-cwd 2009-08-03 06:58:30.000000000 +0000
222
+++ expect/example/rlogin-cwd 2009-08-03 08:31:41.000000000 +0000
225
+#!/usr/bin/expect --
226
# rlogin-cwd - rlogin but with same directory
228
# You can extend this idea to save any arbitrary information across rlogin
229
diff -Naurp expect.orig/example/robohunt expect/example/robohunt
230
--- expect.orig/example/robohunt 2009-08-03 06:58:30.000000000 +0000
231
+++ expect/example/robohunt 2009-08-03 08:31:41.000000000 +0000
234
+#!/usr/bin/expect -f
236
# robohunt player-name [-nodisplay]
238
diff -Naurp expect.orig/example/rogue.exp expect/example/rogue.exp
239
--- expect.orig/example/rogue.exp 2009-08-03 06:58:30.000000000 +0000
240
+++ expect/example/rogue.exp 2009-08-03 08:31:41.000000000 +0000
243
+#!/usr/bin/expect -f
244
# Look for a GREAT game of rogue.
245
# Idea is that any game with a Strength of 18 is unusually good.
246
# Written by Don Libes - March, 1990
247
diff -Naurp expect.orig/example/telnet-cwd expect/example/telnet-cwd
248
--- expect.orig/example/telnet-cwd 2009-08-03 06:58:30.000000000 +0000
249
+++ expect/example/telnet-cwd 2009-08-03 08:31:41.000000000 +0000
252
+#!/usr/bin/expect --
253
# telnet-cwd - telnet but with same directory
255
# You can extend this idea to save any arbitrary information across telnet
256
diff -Naurp expect.orig/example/term_expect expect/example/term_expect
257
--- expect.orig/example/term_expect 2009-08-03 06:58:30.000000000 +0000
258
+++ expect/example/term_expect 2009-08-03 08:31:41.000000000 +0000
260
-#!/depot/path/expectk
263
# Name: tkterm - terminal emulator using Expect and Tk text widget, v3.0
264
# Author: Don Libes, July '94
265
diff -Naurp expect.orig/example/timed-read expect/example/timed-read
266
--- expect.orig/example/timed-read 2009-08-03 06:58:30.000000000 +0000
267
+++ expect/example/timed-read 2009-08-03 08:31:41.000000000 +0000
270
+#!/usr/bin/expect -f
271
# read a complete line from stdin
272
# aborting after the number of seconds (given as an argument)
274
diff -Naurp expect.orig/example/timed-run expect/example/timed-run
275
--- expect.orig/example/timed-run 2009-08-03 06:58:30.000000000 +0000
276
+++ expect/example/timed-run 2009-08-03 08:31:41.000000000 +0000
279
+#!/usr/bin/expect -f
280
# run a program for a given amount of time
281
# i.e. time 20 long_running_program
283
diff -Naurp expect.orig/example/tknewsbiff expect/example/tknewsbiff
284
--- expect.orig/example/tknewsbiff 2009-08-03 06:58:30.000000000 +0000
285
+++ expect/example/tknewsbiff 2009-08-03 08:31:41.000000000 +0000
287
-#!/depot/path/expectk
292
diff -Naurp expect.orig/example/tkpasswd expect/example/tkpasswd
293
--- expect.orig/example/tkpasswd 2009-08-03 06:58:30.000000000 +0000
294
+++ expect/example/tkpasswd 2009-08-03 08:31:41.000000000 +0000
296
-#!/depot/path/expectk -f
297
+#!/usr/bin/expectk -f
298
# tkpasswd - Change passwords using Expectk
299
# Author: Don Libes, NIST, October 1, 1993
300
# Version: 1.8 - Added support for Tk 4.1
301
diff -Naurp expect.orig/example/tkterm expect/example/tkterm
302
--- expect.orig/example/tkterm 2009-08-03 06:58:30.000000000 +0000
303
+++ expect/example/tkterm 2009-08-03 08:31:41.000000000 +0000
305
-#!/depot/path/expectk
308
# Name: tkterm - terminal emulator using Expect and Tk text widget, v3.0
309
# Author: Don Libes, July '94
310
diff -Naurp expect.orig/example/unbuffer expect/example/unbuffer
311
--- expect.orig/example/unbuffer 2009-08-03 06:58:30.000000000 +0000
312
+++ expect/example/unbuffer 2009-08-03 08:31:41.000000000 +0000
315
+#!/usr/bin/expect --
316
# Description: unbuffer stdout of a program
317
# Author: Don Libes, NIST
319
diff -Naurp expect.orig/example/virterm expect/example/virterm
320
--- expect.orig/example/virterm 2009-08-03 06:58:30.000000000 +0000
321
+++ expect/example/virterm 2009-08-03 08:31:41.000000000 +0000
324
+#!/usr/bin/expect --
326
# Name: virterm - terminal emulator using Expect, v1.0, December, 1994
327
# Author: Adrian Mariano <adrian@cam.cornell.edu>
328
diff -Naurp expect.orig/example/vrfy expect/example/vrfy
329
--- expect.orig/example/vrfy 2009-08-03 06:58:30.000000000 +0000
330
+++ expect/example/vrfy 2009-08-03 08:31:41.000000000 +0000
332
-#!/depot/path/expect -f
333
+#!/usr/bin/expect -f
336
# separate address into user and host
337
diff -Naurp expect.orig/example/weather expect/example/weather
338
--- expect.orig/example/weather 2009-08-03 06:58:30.000000000 +0000
339
+++ expect/example/weather 2009-08-03 08:31:41.000000000 +0000
342
+#!/usr/bin/expect -f
344
# weather - Expect script to get the weather (courtesy University of Michigan)
346
diff -Naurp expect.orig/example/xkibitz expect/example/xkibitz
347
--- expect.orig/example/xkibitz 2009-08-03 06:58:30.000000000 +0000
348
+++ expect/example/xkibitz 2009-08-03 08:31:41.000000000 +0000
351
+#!/usr/bin/expect --
353
# share an xterm with other users
354
# See xkibitz(1) man page for complete info.
355
diff -Naurp expect.orig/example/xpstat expect/example/xpstat
356
--- expect.orig/example/xpstat 2009-08-03 06:58:30.000000000 +0000
357
+++ expect/example/xpstat 2009-08-03 08:31:41.000000000 +0000
359
-#!/depot/path/expectk
362
# This script acts as a front-end for xpilot. Run it in the background,
363
# and it will pop up a window for each server it finds running. After
364
diff -Naurp expect.orig/example/xrlogin expect/example/xrlogin
365
--- expect.orig/example/xrlogin 2009-08-03 06:58:30.000000000 +0000
366
+++ expect/example/xrlogin 2009-08-03 08:31:41.000000000 +0000
368
-#!/depot/path/expect --
369
+#!/usr/bin/expect --
370
# xrlogin - rlogin but with current DISPLAY
372
# You can extend this idea to save any arbitrary information across rlogin