my $server_tz =  0 ; # GMT
my $client_tz = -8 ; # PST
my $offset    = $client_tz - $server_tz ;

my @t = localtime( time + ( $offset * 3600 ) ) ;

my $date = sprintf "%d/%d/%d", $t[4] + 1, $t[3], $t[5] + 1900 ;