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

Re: Heute in x Werktagen

Steffen Beyer - Thu Oct 04 07:16:56 2007

Hello Joerg Meltzer, in a previous mail you wrote:

> 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

Zu spät gesehen - Danke daß Du alle Fragen so ausführlich beantwortet hast!

-- 
    Steffen Beyer <sb@engelschall.com>
    http://www.engelschall.com/u/sb/whoami/ (Who am I)
    http://www.engelschall.com/u/sb/gallery/ (Fotos Brasil, USA, ...)
    http://www.engelschall.com/u/sb/download/ (Free Perl and C Software)


Next: