[Thread Prev][Thread Next]   >Date Index >Thread Index

Re: Heute in x Werktagen

Joerg Meltzer - Wed Oct 03 23:43:07 2007

Hi Roland,

Roland Moriz schrieb:
> Joerg Meltzer schrieb:
>   
>> Date::Calc hilft auch bei dem Bundesländerproblem...
>>
>> guckst du Quellcode
>>     
>
> Gibts da auch ein Locale für zB. Augsburg? (Friedensfest)
>
> Mit freundlichen Gruessen,
> Roland Moriz
>
> --
> Moriz Softwareentwicklung
>
> Office:
> Theresienstrasse 66 Rgb
> 80333 Muenchen
>
> Sitz:
> Hedwig-Dransfeld-Allee 14
> 80637 Muenchen
>
> Tel:  089 / 216 685 91
> Fax:  089 / 216 685 92
> Web:  http://www.perl-freelancer.com/
>       http://www.moriz.de/
> Xing: https://www.xing.com/profile/Roland_MORIZ
>
> Steuernummer: 145/334/35675
> Finanzamt Muenchen III
>   
Es gibt keine Locale für Augsburg, aber du kannst ja die Bayern Locale
um den einen Tag erweitern ;-)

$ perl -e '
use Date::Calendar;
use Date::Calendar::Profiles qw($Profiles);
$cal = Date::Calendar->new($Profiles->{"DE-BY"});

print "Arbeitstage: ", $cal->delta_workdays(
  2007,8,8 =>
  2007,8,8 =>
  1,1)'
Arbeitstage: 1

$ perl -e '
use Date::Calendar;
use Date::Calendar::Profiles qw($Profiles);
$Profiles->{"DE-BY"}{"Friedensfest"} = "08.08.";
$cal = Date::Calendar->new($Profiles->{"DE-BY"});

print "Arbeitstage: ", $cal->delta_workdays(
  2007,8,8 =>
  2007,8,8 =>
  1,1)'
Arbeitstage: 0


-- 
Jörg Meltzer * joerg.meltzer@tngtech.com * +49-176-22664106
TNG Technology Consulting GmbH, Betastr. 13a, 85774 Unterföhring
Geschäftsführer: Henrik Klagges, Gerhard Müller, Christoph Stock
Amtsgericht München, HRB 135082 


Attachment: signature.asc
Description: OpenPGP digital signature


Next: