FlorianL+2008-01-21 14:12:50--

Code (perl): (dl )

chomp(my $prechk = `echo $preday |wc -ck`);

Also das sieht eh nicht so besonders hübsch aus. Und bis man bei so etwas alle möglichen Sonderzeichen in $preday richtig escapet hat, ist auch einige Zeit vergangen. Ferner ist es nicht besonders portabel, ich konnte weder bei GNU noch bei Solaris eine Option -k für wc finden. Daher weiß ich nicht genau, was dieser Befehl tun soll, aber ich nehme mal an, er soll einfach die Zeichen zählen.
Wenn wir nun eh schon Perl statt Shell programmieren, können wir dazu auch einfach length() verwenden. Backticks zu verwenden, um irgendwelche Stringmanipulationen zu machen, ist in so gut wie 100% aller Fälle unnötig, weil Perl das auch kann.

Um mit Datumsangaben zu rechnen: Date::Calc, Date::Parse et. al.
Um Verzeichnisse auszulesen: perldoc -f opendir, perldoc IO::Dir
Oder rekursiv: File::Find