[Ssh-sftp-perl-users] assigning variables to automate sftp login

[Ralf W. <mrs...@ya...>]

# The file push.ctl contains information needed to perform the ftp for each=
 host.=0A=0Aopen(VARIABLES, "push.ctl");=0A=0ALINE: while(<VARIABLES>) {=0A=
=0A    ($dir,$ibm,$ftp_home,$hostname,$username,$password,$typ,$site,$file)=
=3Dsplit(/:/);=0A=0A my $host =3D 'xxx.yyy.zzz.aaa';=0A    my %args =3D (us=
er =3D> "userid",=0A                password  =3D>  "password",=0A         =
       ssh_args  =3D>  [port=3D>22]);=0A=0A=0AI'm reading in the informatio=
n needed to sftp files to a remote server.  How can I also assign $username=
 to user =3D> ?=0ASo I can reading in IP address ($hostname), user ($userna=
me) and password ($password) from a input file?=0AThank You=0ARalf=0A=0A=0A=
=0A=0A       =0A___________________________________________________________=
_________________________=0APinpoint customers who are looking for what you=
 sell. =0Ahttp://searchmarketing.yahoo.com/