Begrüßung nach Uhrzeit

[dobra]

Kunden sollen je nach Urzeit anders begrüßt werden

Lösung:

Code [Auswählen] Expand

<!--spmacro:module(check)
sub zeit {
use Time::Local;
my ($sec,$min,$hour,$mday,$mon,$year) = localtime(time);
my $out = "Hallo";
if ($hour >= 5 && $hour <=10) {$out = "Guten Morgen";}
if ($hour >= 18 && $hour <=22) {$out = "Guten Abend";}
main::mprint ($out);
}
-->

Ausgabe mit
__check::zeit__ __Anrede__ __Name__

Wenn man das in stdall.ipl schreibt, kann das dann auf jeder beliebigen Seite so ausgegeben werden.