#!/bin/sh
# pega arquivos tcl de sprite.berkeley.edu
cd /n/s10/modula-3/m3-2.07/FROM-FTP/TEMP-tcl-tk
pwd
ftp -i -v -n >> /home/staff/stolfi/ftp-logs/`date '+%y-%m-%d-%H%M%S'`-tcl.log <<FIM
  open sprite.berkeley.edu
  user anonymous stolfi@dcc.unicamp.br
  cd tcl
  dir
  type binary
  get tk2.3.tar.Z
  get tcl6.4.tar.Z
  get book.p1.ps.Z
  get tclUsenix90.ps
  get tkUsenix91.ps
  get tkF10.ps
  get talk1.ps
  get talk2.ps
  get talk3.ps
  get talk4.ps
  get talk5.ps
  get tkSquare.c
  quit
FIM