Quoteif ($Jahresbeginn eq "01.01.") { print "Ein frohes neues Jahr\n"; } else { print "Pech gehabt :-)))\n"; }