Jan Bartels: berichtigt

2006-02-04T14:51:11Z

berichtigt

Jan Bartels: CSV-Tabellen ins wiki-Format konvertieren

2006-02-04T14:31:18Z

CSV-Tabellen ins wiki-Format konvertieren

Neue Seite

Zur Konvertierung von Tabellen (Excel, OpenOffice) habe ich ein kleines perl-Script gebastelt. Es sollte unter allen Betriebssystemen laufen. Voraussetzung ist ein installiertes Perl-Modul Text::CSV_XS, das man ggf. vorher über CPAN installieren muß.

Im Quelltext vom Script muß der Dateiname angepaßt werden. Es können auch weitere Features ergänzt werden. Das ganze ist eher als ein Beispiel anzusehen.

<pre>
use strict;
use Text::CSV_XS;

open( FILE, "<tabelle.csv" );

my $csv = Text::CSV_XS->new({
'quote_char' => '"',
'escape_char' => '"',
'sep_char' => ',',
'binary' => 1
});

print "{|\n";
while ( my $line = <FILE> )
{
chomp( $line);
if ($csv->parse($line))
{
my @field = $csv->fields;
print "|-\n";
for my $column (@field) {
print "| ", $column ne '' ? $column : ' ', "\n";
}
}
else
{
my $err = $csv->error_input;
die "parse() failed on argument: $err\n";
}
}
print "|}\n";

close( FILE );
</pre>

@@ Zeile 25: / Zeile 25: @@
        print "|-\n";
        for my $column (@field) {
-         print "| ", $column ne '' ? $column : '&nbsp;', "\n";
+         print "| ", $column ne '' ? $column : '&amp;nbsp;', "\n";
+       }
+     }

Benutzer:Jan Bartels/csv2wiki.pl - Versionsgeschichte

Jan Bartels: berichtigt

Jan Bartels: CSV-Tabellen ins wiki-Format konvertieren