Opened by lukastonner at 2010-06-18 16:31
User since
2010-02-07
47 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2010-02-07
47 Artikel
BenutzerIn
Hallo,
ich versuche via ftp CSV-Dateien (Kommagetrennt), die etwa so aussehen:
1234,2009/06/17 14:10:00,1234,-10.5,..,..,..,
1235,2009/06/17 14:20:00,1234,-10.5,..,..,..,
in eine Tab-getrennte .txt umzuwandeln und das Datum anders auszugeben (2009-06-17T14:10:00).
Ich hole die Daten wie folgt:
Wie kann man die Dinger überhaupt umwandlen? und kann man die Dateien "on the fly" umwandeln oder muss ich sie aus meinem Verzeichnis laden und umformen?
use Text::CSV ist auf meiner Solaris Maschine nicht installiert.Habe folgendes gefunden, aber es scheint mir nicht der richtige Weg zu sein....
Vielen Dank schonmal im vorraus
ich versuche via ftp CSV-Dateien (Kommagetrennt), die etwa so aussehen:
1234,2009/06/17 14:10:00,1234,-10.5,..,..,..,
1235,2009/06/17 14:20:00,1234,-10.5,..,..,..,
in eine Tab-getrennte .txt umzuwandeln und das Datum anders auszugeben (2009-06-17T14:10:00).
Ich hole die Daten wie folgt:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
$ftp = Net::FTP->new($host, Debug => 0)
or die "Es konnte keine Verbindung zu $host: $@ aufgebaut werden", $ftp->message;
$ftp->login($user, $pass);
$ftp->cwd("/data/outgoing/")
or die "Ziel-Verzeichnis nicht gefunden", $ftp->message;
@dir = $ftp->ls('*.*');
foreach(@dir){
$filename=$_;
$ftp->get($filename, "@dest_dir$filename");
};
$ftp->quit();
Wie kann man die Dinger überhaupt umwandlen? und kann man die Dateien "on the fly" umwandeln oder muss ich sie aus meinem Verzeichnis laden und umformen?
use Text::CSV ist auf meiner Solaris Maschine nicht installiert.Habe folgendes gefunden, aber es scheint mir nicht der richtige Weg zu sein....
Code: (dl
)
my $filename = grep defined, /(?:^|,) (?: "([^"]+)" | ([^,]+))/xg;
Vielen Dank schonmal im vorraus