Copying files to another server

Scarborough has asked for the wisdom of the Perl Monks concerning the following question:

I have a perl script which currently lists files to a SPOOLLIB directory on the same server. However we now have a requirement to send the files to a dedicated print server over a windows network.

I have used a

$result = system "net use b: \\\\printserver\\d$ $password /USER:$user
+"; 

#copy the files

$result= system "net use b: /DELETE";
[download]

command to share the directory and then copy files,it works, but this is not really satisfactory for a number of reasons.

Can anyone tell me the best way to achive this in perl?

Comment on Copying files to another server Download Code

Replies are listed 'Best First'.
Re: Copying files to another server by ZlR (Chaplain) on Feb 17, 2005 at 16:54 UTC
Hello, Which windows ? My Win2K has an rcp command, which does remote copy between systems. You could call it through system ... Also Win32::NetRessource (standard distribution module) can help you manage the net shares without resorting to net use and system calls. zlr	[reply]
Re: Copying files to another server by holli (Abbot) on Feb 17, 2005 at 16:54 UTC
I guess the easiest way is to stick with a shared network drive. If you want something more perlish, there is Win32::DriveInfo to find out about free drive letters and Win32::NetResource to establish a connection to a remote server. holli, /regexed monk/	[reply]
Re: Copying files to another server by Jaap (Curate) on Feb 17, 2005 at 16:42 UTC
You could use FTP or SCP or some win32 specific protocol. First choose a protocol and then find a perlish way to do it. If you want to keep using the win32 method you are using now, i don't think (perl\|some module) can do a better job at it.	[reply]
Re: Copying files to another server by naChoZ (Curate) on Feb 17, 2005 at 18:37 UTC
I've never used the windows version, but you can use rdist in conjunction with ssh. Something along the lines of: `/usr/local/bin/rdist6 -P /usr/local/sbin/ssh \ -p /<path on remote machine>/rdistd -R \ $@` [download] Unison has a windows version also. -- "This alcoholism thing, I think it's just clever propaganda produced by people who want you to buy more bottled water." -- pedestrianwolf	[reply] [d/l]