ftp_push: 

 Mirrors a set of local files (e.g. website pages & images) to an ftp server.
 Place the mirrored dirs and file globs in the %content in script (or use -f).
 N.B. each dir has an ftp MDELETE run on it. ALL remote files are destroyed.
 Copyright (c) 2001 by Karl J. Runge <runge@karlrunge.com>


Usage: ftp_push <options> <items>

Options:
	-h <host>	set ftp server host (ftp.somesite.net)
	-u <user>	set ftp server user name (runge)
	-p <pass>	set ftp server password

	-d <dir>	set toplevel ftp server directory
			(public_html/mysite/test)

	-c <dir:file>	create and/or add to the content hash.
			<file> could be a glob pattern.
			Overrides content in -f file or script defaults.
			Overridden by command line items.

	-k		mkdir the directories (e.g. the initial upload)
			(will create all components of toplevel dir if missing)
	-R		remove all the files and directories
			(but does not remove top level dir)

	-t <time>	set waitfor() timeout in seconds (30 sec)
	-n 		do not do MDELETE on remote dirs.
	-P		do not use passive ftp mode.
	-x		yield an interactive ftp shell after logging in.

	-f <file>	source config file <file> to set variables.

	-D 		turn on much debugging output for waitfors and etc.

	<items>		specific items to upload, overrides %content
			and implies -n

Here is example setting of the %content hash (set in this script or -f file)

$content{'.'}		= '*.html *.css';
$content{'images'}	= '*.jpg *.gif';
$content{'doc'}		= '*.pdf *.ps';
$content{'doc/txt'}	= '*.txt';

that is to say, all html and css files in the current dir get uploaded
to toplevel_dir on the remote machine and then all jpg and gif files in
images get uploaded to toplevel_dir/images. Etc.

An <item> might look like images/picture1.gif, etc.

Notes:
	If password is empty then it will be prompted for w/o echoing.
	If it is 'NONE' no password is used.
	If it is 'STDIN' password is read from next line of STDIN.

	Uses twice the timeout when uploading files (2 * 30 sec).

	Make the -f file look like the top portion of this script,
	then set your defaults. It will be sourced as perl commands.

	The mkdirs, mdeletes, and rmdirs are assumed to succeed with
	no checking. 

	It is of course better to use scp(1) or rsync(1)+ssh(1) to
	avoid passwords being sniffed. But some webpage providers
	only provide ftp(1) access. scp(1) and rcp(1) have recursive
	copying features as well.

	This program depends extensively on the input and output of
	the BSD ftp(1) command. It likely will not work with other ftp
	clients, unless they are highly compatible.