X-Git-Url: http://git.rot13.org/?p=virtual-ldap;a=blobdiff_plain;f=bin%2Fcsv2yaml.pl;h=7faa9afefeda44c5d396db747f58622ec94ff96e;hp=ec9bf4e17a657a7aa902f8a73ada7e4184d2d74f;hb=4f4ef12009e8ec6d070f7473d2405ec0659229ba;hpb=d8ce285eb264c426855a012d6afe1b3b613a8452 diff --git a/bin/csv2yaml.pl b/bin/csv2yaml.pl index ec9bf4e..7faa9af 100755 --- a/bin/csv2yaml.pl +++ b/bin/csv2yaml.pl @@ -47,6 +47,7 @@ foreach my $line ( split(/\r?\n/, $csv) ) { # fix tel fields $v =~ s{\s+}{#}g if $n =~ m{tel}; + $v =~ s[\x{17d}][F] if $n =~ m{spol}; if ( $v =~ m{#} ) { my @v = split(/\s*#\s*/, $v);