saas786/fetch-google-hourly-trends.pl

## fetch-google-hourly-trends.pl
#!/usr/bin/perl

use LWP::Simple;

use strict;
use warnings;

my $content = get("feed://www.google.com/trends/hottrends/atom/hourly");
die "Could not retrieve feed" unless defined ($content);
	#!/usr/bin/perl

	use LWP::Simple;

	use strict;
	use warnings;

	my $content = get("feed://www.google.com/trends/hottrends/atom/hourly");
	die "Could not retrieve feed" unless defined ($content);