I am using the Filesys::SmbClientParser module in my program. It is working well with one exception...
I am getting this sprinkled liberally in my output:
What incantation might I chant to exorcise this demon? I have consulted all of the sacred scrolls (Google) to no avail!Domain=[XXX] OS=[SpinStream2] Server=[Windows 2000 Lan Manager]
SOLUTION: Thanks to monk: your_mother
And the list of files flow freely without the demonic curses.#!/usr/bin/perl -w use Filesys::SmbClientParser; use Capture::Tiny ':all'; my $smb = new Filesys::SmbClientParser; $smb->Debug(0); $smb->Workgroup('mydomain'); $smb->User('myid'); $smb->Password('mypwd'); $smb->Host('myhost'); $smb->Share('mysharename'); # List content $stderr = capture_stderr { $smb->cd('to/som/directory') or die("cd failed failed: $smb->err, +$!");; }; #<-note the closing ; my @l; $stderr = capture_stderr { @l = $smb->dir or die("List failed failed: $smb->err, $!"); }; #<-note the closing ; foreach (@l) {print $_->{name},"\n";}
In reply to Suppress unwanted text from Filesys::SmbClientParser by paullem
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |