PerlCasual #4 (2011/4/28, æ± è¢ã¸ã¥ã³ã¯å )ã§è¡ã£ããã¼ã¯ã®ã¹ã©ã¤ãã§ãã åç»ãYouTubeã§å ¬éãã¦ããã®ã§ããããã¦ã覧ãã ãããhttp://youtu.be/kLt2aYN7UYE, http://youtu.be/xVC9pqCe8cE Read less
PerlCasual #4 (2011/4/28, æ± è¢ã¸ã¥ã³ã¯å )ã§è¡ã£ããã¼ã¯ã®ã¹ã©ã¤ãã§ãã åç»ãYouTubeã§å ¬éãã¦ããã®ã§ããããã¦ã覧ãã ãããhttp://youtu.be/kLt2aYN7UYE, http://youtu.be/xVC9pqCe8cE Read less
ããªããããåããã®ã§Perlç°å¢ã確èªãã¦ã¿ã¾ãããã¬ã³ã¿ã«ãµã¼ããåããã®ã¯ä¹ ãã¶ãã§ãã æ¬å½ã¯root権éã欲ããã®ã§ããé«ããé¢åãªã®ã§ä»åã¯ãã¹ã >perl -v This is perl, v5.8.0 built for i386-linux-thread-multi (with 1 registered patch, see perl -V for more detail) Copyright 1987-2002, Larry Wall (以ä¸ç¥) Perlã¢ã¸ã¥ã¼ã«ã¯ãperl -MCPAN -e 'autobundle'ãã§è¦ããã¨æã£ããCPANã¢ã¸ã¥ã¼ã«ããªãã¿ãããªã®ã§ã ããã®ã¹ã¯ãªããã使ãã¾ãããçµæã¯ä¸ã®ã»ãã«ã åã©ãããªããªãå å®ãã¦ãã¾ããTemplate-Toolkitã¨Class::DBIãå ¥ã£ã¦ããªãã®ãæ®å¿µãã¡ã¼ã«ãã¦ã¿ããããªã Any
å¿ è¦ã«é§ããã¦ä½ã£ã¦ã¿ã¾ããã»ã»ã»ãã¢ã¸ã¥ã¼ã«ã®ä½¿ããããããããã£ã¦ããªã人ãä½ã£ã¦ããã®ã§ããã®ã¤ããã§ã使ããã ããã 使ããã ã¯ããã«ã[Perl] XML::FeedPP - RSSã»RDFã»Atomãã£ã¼ãã®è§£æã»çæã»å¤æã»çµåãã§ãFeedPP.pmã¨TreePP.pmãæã«å ¥ãã¦ã以ä¸ã®CGIãç½®ããã©ã«ãã®ä¸ã«ãXMLãã¨ãããã©ã«ããä½ããããã«ããã¦ãã ããã ä¸è¨ã½ã¼ã¹ãç¨éã¨ç°å¢ã«åããã¦ç·¨éãããµã¼ãã¼ã«ã¢ãããã¼ããã¦ãã¼ããã·ã§ã³ãé©åã«è¨å®ããWWWãã©ã¦ã¶ããå®è¡ãã¦ãã ããããåºåå®äºãã¨è¡¨ç¤ºãããããCGIãç½®ãããã©ã«ãã«ãfeed.rdfãã¨ãããã¡ã¤ã«ãã§ãã¦ãã¾ããpingã®éä¿¡å ã¨ãã¦å½CGIãæå®ããã°ãããã°ã®æ´æ°ããã¨èªåçã«ãã£ã¼ããæ´æ°ãããããã«ãªãã¾ãã ã½ã¼ã¹ ã[Perl] XML::FeedPP - RSSã»RDFã»
Kawa.netxp [Perl] XML::FeedPP - RSSã»RDFã»Atomãã£ã¼ãã®è§£æã»çæã»å¤æã»çµå XML::FeedPP ã¢ã¸ã¥ã¼ã«ã¯ã RSS 2.0ãRSS 1.0 (RDF)ãAtom 0.3ï¼ããã³1.0ï¼ãã£ã¼ãã® XML ãã¡ã¤ã«ã解æã»çæã»å¤æã»çµåããããã® Perl ã¢ã¸ã¥ã¼ã«ã§ãã RSS ãã¼ã¹ã®1種é¡ã®å ±é API 㧠RSSã»RDFã»Atom ã®åãã©ã¼ãããã®å¦çã«å¯¾å¿ãã¦ããããã æ軽ã«æ±ãã¾ãã ãã£ã¼ãã®èªã¿åºãã»æ¸ãè¾¼ã¿ã¯ãã¡ããã RSSããRDFã¸ãRDFããAtomã¸ã¨ãã£ãåãã©ã¼ãããéã®ç¸äºå¤æãå¯è½ã§ãã ä»ãµã¤ããããã¦ã³ãã¼ãããè¤æ°ã®ãã¡ã¤ã«ãçµåãã¦ã ã¾ã¨ãã¦1ã¤ã®ãã¡ã¤ã«ã¨ãã¦åºåãããã¨ãã§ãã¾ãã å ¬éçã¢ã¼ã«ã¤ãï¼ XML-FeedPP-0.43.tar.gz TARGZ CPAN âé常ããã±
åç´ãªéãåããã®ä¾ Composite()ã使ãã¨2ã¤ã®ç»åãéãåããã¦åæãããã¨ãåºæ¥ã¾ããç°¡åãªä¾ããå§ãã¾ãã #!/usr/local/bin/perl -w use strict; use Image::Magick; # å ç»å my $file = "sample.jpg"; # éããç»å my $file2 = "sample2.jpg"; # å ç»åèªã¿è¾¼ã my $image = Image::Magick->new; $image->Read($file); # éããç»åãèªã¿è¾¼ã my $image2 = Image::Magick->new; $image2->Read($file2); # éããç»åã®ãµã¤ãºå¤æ´ $image2->Resize(width=>150, height=>105, blur=>0.7); # ç»åãåæãã $image-
ã©ã³ãã³ã°
ã©ã³ãã³ã°
ã©ã³ãã³ã°
ãªãªã¼ã¹ãé害æ å ±ãªã©ã®ãµã¼ãã¹ã®ãç¥ãã
ææ°ã®äººæ°ã¨ã³ããªã¼ã®é ä¿¡
å¦çãå®è¡ä¸ã§ã
j次ã®ããã¯ãã¼ã¯
kåã®ããã¯ãã¼ã¯
lãã¨ã§èªã
eã³ã¡ã³ãä¸è¦§ãéã
oãã¼ã¸ãéã
{{#tags}}- {{label}}
{{/tags}}