Opened by tecker at 2008-05-07 16:19
User since
2008-02-26
77 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2008-02-26
77 Artikel
BenutzerIn
Danke, hab mein Skript mal ein wenig geändert ;)
Wusste garnicht dass bei einem
die Werte autom. schon in $1,$2,... gespeichert werden. Erspart mir das s/// und ich kann/könnte die $filename Variable weiter verwenden.
ein my ($s_a,$s_b,$s_c)=@spalten kann ich leider nicht machen, da ich nicht nur 3 spalten brauche sondern 40 aus 130 die nicht fortlaufen sind.
Was noch folgt im Programm ist eine Überprüfung ob die Werte leer oder nicht defiert sind und im Fall das es so ist eine Zuweisung einer "0". Danach soll alles in eine DB rein.
Die Überprüfung wollte ich mit
machen, klappt aber nicht immer, da er glaube kein eq Vergleich machen kann FALLS der Wert undef ist, oder??
Wusste garnicht dass bei einem
Code: (dl
)
$file =~ /extasc_cdr_(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})_(\d+).csv/die Werte autom. schon in $1,$2,... gespeichert werden. Erspart mir das s/// und ich kann/könnte die $filename Variable weiter verwenden.
ein my ($s_a,$s_b,$s_c)=@spalten kann ich leider nicht machen, da ich nicht nur 3 spalten brauche sondern 40 aus 130 die nicht fortlaufen sind.
Was noch folgt im Programm ist eine Überprüfung ob die Werte leer oder nicht defiert sind und im Fall das es so ist eine Zuweisung einer "0". Danach soll alles in eine DB rein.
Die Überprüfung wollte ich mit
Code: (dl
)
if (not defined $s_a || $s_a eq ''){$s_a = 0;}