Module for accessing samba smbclient command

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

Hi, I wish to list printers using in a web interface running on a unix sysetm. From the command line I can do smbclient -L and list printers etc. Is there a module I can use from CPAN which interfaces with samba to allow me to access this? Thanks

Comment on Module for accessing samba smbclient command

Replies are listed 'Best First'.
Re: Module for accessing samba smbclient command by quester (Vicar) on Dec 14, 2011 at 06:41 UTC
I don't see a CPAN module offhand, but you might consider a simple-minded approach. What happens if you try `my $output = qx{smbclient -L}; say $output;` [download]	[reply] [d/l]
Re^2: Module for accessing samba smbclient command by Anonymous Monk on Dec 14, 2011 at 13:19 UTC
Thank you. I've got the results in a variable. Here is how it prints with DataDumper: `$VAR1 = 'Printer1 Printer Printer 1 Printer2 Printer Printer 2 Store Printer Store printer ';` [download] How can I create an array containing just the printer names (col 1)?	[reply] [d/l]
Re^3: Module for accessing samba smbclient command by quester (Vicar) on Dec 15, 2011 at 08:49 UTC
`my @printers = $VAR1 =~ /^(\S+)/mg;` [download] See Matching in list context in perlop.	[reply] [d/l]