以ä¸ã®ããã°ã©ã ï¼åèï¼ä½ã£ã¦å¦ã¶ãä»ã©ãã®Webãµã¼ãã¹: 第2å RSSãã£ã¼ãã®æçã¯LWPã¨XML::RSSã«ãã¾ããï¼ãå®è¡ãããããWide character in print atãã¨ããã¡ãã»ã¼ã¸ã print ãå®è¡ãã度ã«åºåããã¦ãã¾ã£ãã #!/usr/local/bin/perl # http://www.ibm.com/developerworks/jp/webservices/library/itm-ws2-rss/ use strict; use Encode; use LWP::Simple; use XML::RSS; my $url = shift; my $document = LWP::Simple::get($url) or die "cannot get content from $url"; my $rss = XML::RSS->new;
{{#tags}}- {{label}}
{{/tags}}