Weniger Rechnen oder weniger tippen?

[hotti]

hi,

»» sub timezone_offset_date() {
»»   return qx(/bin/date +"%z");
»» }

<= morgen in der Mittagspause...

Ok, das tut. Ist jedoch systemabhängig, auch das da:

  
use POSIX qw(strftime);  
my $z = strftime("%z", localtime(time));  
print "$z\n";  

=> "Westeuropäische Sommerzeit" Danke ;-)

Hotte