Select Code to Download

Domain=[XXX] OS=[SpinStream2] Server=[Windows 2000 Lan Manager]

#!/usr/bin/perl -w
use Filesys::SmbClientParser;
...
}; #<-note the closing ;

foreach (@l) {print $_->{name},"\n";}