名称WWW::Google::Time-通过Google获取不同地点的时间

概述

use strict;
use warnings;
use WWW::Google::Time;
my $t = WWW::Google::Time->new;
$t->get_time("Toronto") or die $t->error;
printf "It is %s, %s (%s) %s %s, %s in %s ", @{ $t->data }{qw/ day_of_week time time_zone month month_day year where /};

描述

模块简单，接受地点名称并返回该地点的当前时间（如果谷歌提供该信息）。

构造器new

my $t = WWW::Google::Time->new;