|Just another Perl shrine|
Accessing files on a Windows server from *NIX via SMBby jimbus (Friar)
|on Aug 22, 2005 at 15:52 UTC||Need Help??|
jimbus has asked for the
wisdom of the Perl Monks concerning the following question:
A new day, a new distraction...
We have a new single most important to do on our list. We have to compare a list of billing files that someone posts as a cvs file on a Windoze server with the actual directory listing on our SMS machine (VMS) and report on discrepencies. (Ignorable RANT: this whole thing is crap. Without scripting, she's adding .5 to 1 hours works to someones day (the early person, which rotates) and she has nothing to do with billling reconciliation, but she CC'd the CIO and the billing VP and now its law *grumble* *growl*)
So... to get back to the subject... I created a nifty little PERL script on a UNIX box that reads and parses the CSV file and uses FTP to get a dir listing, compares the two and spits out whats in both or one or the other.
This works reasonably well, but the user currently needs to ftp the files over to the UNIX box. Can anyone give me an example of using PERL to establish an SMB connection from a Solaris 8 machine (though it could just as easily be FreeBSD) and an XP server to retrieve files? The XP box is not ours, we normally only have access to it through mounts on our laptops. I called IS and they recommended SMB, but didn't offer any advice on how to do it. I've done googled a bit on this and have only been able to find articles on using samba to share printers and file systems to the PC.
A bored Jimbus not longer communicates, "Never moon a werewolf!"