Re^2: Module for accessing samba smbclient command

[Anonymous Monk]

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
';

How can I create an array containing just the printer names (col 1)?

[quester]

my @printers = $VAR1 =~ /^(\S+)/mg;

See Matching in list context in perlop.