Actually i think u are missunderstood of my question.
I am very sorry if my question are quite blurr...I
have a perl script that doing FTP..and it's
success...But i just wanna know if i can run that
shell script in perl...
My FTP's shell script is like this....
HOST='***.***.***.***'
USER='abcd'
PASSWD='abcd'
loc_dir=/home/roime/SHELL_SCRIPT/
echo Connected............
#List all the value inside the flow directory
for flow in "$loc_dir"
do
ls *.flow
done
#Now move the file into right directory and start FTP
session
for file in *.flow
do
ftp -n $HOST <<END_SCRIPT
quote USER $USER
quote PASS $PASSWD
pwd
cd /home/zaki
put $file
ls >var/flowftp_log2
quit
END_SCRIPT
#Remove file after transfered to free the storage and
reduce time lack..!
rm $file
done
exit 0
---------------------------------------------------
45,1 Bot
--- Chris Devers <[EMAIL PROTECTED]> wrote:
> On Fri, 10 Dec 2004, roime puniran wrote:
>
> > I have a linux shell script used to transfer files
> > into the other machine and i need PERL running my
> > script..
> > How can i do that?..did some one know?
>
> You need to rewrite a shell script that does file
> transfer in Perl?
>
> Ok, Perl can do that.
>
> How are you trying to transfer the files? There are
> a lot of ways that
> would work -- ftp, scp, rsync, cp over NFS mount (or
> SMB mount, or DAV
> mount, or...), etc. We need to know what options to
> go with.
>
> If the shell script isn't very long, can you paste
> it in a message to
> the list? If it is long, can you paste a section
> with the parts you need
> to rewrite in Perl?
>
> Out of curiosity, if the shell script works, why
> rewrite it? I like Perl
> and all, but not to the point that every perfectly
> good script in some
> other language needs to be rewritten in Perl...
>
>
> --
> Chris Devers
>
> --
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> <http://learn.perl.org/>
> <http://learn.perl.org/first-response>
>
>
>
__________________________________
Do you Yahoo!?
Yahoo! Mail - You care about security. So do we.
http://promotions.yahoo.com/new_mail
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
