projects
/
virtual-ldap
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
af2a646
)
encode yaml in utf-8
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 16 Mar 2009 13:54:50 +0000
(13:54 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 16 Mar 2009 13:54:50 +0000
(13:54 +0000)
bin/csv2yaml.pl
patch
|
blob
|
history
diff --git
a/bin/csv2yaml.pl
b/bin/csv2yaml.pl
index
5193e1e
..
71d76ec
100755
(executable)
--- a/
bin/csv2yaml.pl
+++ b/
bin/csv2yaml.pl
@@
-11,14
+11,14
@@
use Data::Dump qw/dump/;
use File::Slurp;
use YAML qw/DumpFile/;
use Text::CSV;
-use Encode qw/
decode
/;
+use Encode qw/
from_to
/;
my $debug = 0;
my $path = shift @ARGV || die "usage: $0 file.csv\n";
my $csv = read_file( $path );
-
$csv = decode('utf-16', $csv
);
+
from_to($csv, 'utf-16', 'utf-8'
);
my @columns;