#!/v/openpkg/sw/bin/perl use IO::File; use IO::All; use LWP::Simple; use OSSP::uuid; use Date::Format; use Date::Parse; # prepare UUID generation my $uuid_ns_url = new OSSP::uuid; my $uuid_ns = new OSSP::uuid; my $uuid = new OSSP::uuid; $uuid_ns_url->load("ns:URL"); $uuid_ns->make("v3", $uuid_ns_url, "http://www.ossp.org/"); # prepare content generation my $rss_refs = ''; my $rss_items = ''; my $atom_items = ''; # read news page my $html = get("http://meta.openpkg.org/global-news.php"); die "Couldn't get it!" if (not defined($html)); # information parsing and content generation my $date = ""; $html =~ s/