Separator von listuser --csv ändern

[PatrickM]

Hallo,

besteht die Möglichkeit den Separator der csv Ausgabe vom listuser Kommando zu ändern ( Beispielsweise ";" statt ",") ?

Komma ist etwas ungeschickt gewählt, da innerhalb eines Wertes ebenfalls Kommas vorkommen ( Alias@domain.de,Alias2@domain.de, usw.)

Wenn man nun den String zerlegen will , kommt man mit den verschiedenen Kommas in Teufels küche. Bin schon ewig ergebnisslos am Regexen :-(

[Carsten Hoeger]

It is not possible to use a different separator in csv output.
But that is no problem in csv as the spec specifies a solution for that problem.

http://en.wikipedia.org/wiki/Comma-separated_values#Technical_background

[PatrickM]

Verstehe grade nicht wie mir das weiterhelfen soll , aber egal. Hab die Lösung gefunden.
Da die csv Ausgabe etwas unübersichtlich ist, kann man sich so nur bestimmte Werte anzeigen lassen ( hier nur die Aliases). Beim Starten des Programms einfach den username mitgeben.


#!/usr/bin/perl
@csv = `listuser -c 1 -A ADMINUSER -P PASSWD -s $ARGV[0] --csv`;
$csv[1] =~ s/,,/;;/g;
$csv[1] =~ s/,"/;"/g;
@keys = split(/,/,$csv[0]);
@vals = split(/;/,$csv[1]);
my %list;
@list{@keys}=@vals;
print "$list{Aliases}\n";
#
# Folgende zeilen Drucken sämmtliche vorhandenen Wertepaare
#
# foreach $key(keys%list){
# print $key." = ".$list{$key}."\n"
# }