wget --mirror -np $url ã¨ãããã¨ãåãåããªãã¡ã¤ã«åã§ä¿åããã¦æ²æ¨ãªãã¨ã«ãªã£ãããªã®ã§ã1 é層éå®ã§ããã¡ã¤ã«åã復å ãã¤ã¤ wget ãããã¤ã試ãã«ä½ã£ã¦ã¿ããå帰çã«åã£ã¦ãããããã«ããã¨ä¾¿å©ã ãããªãããã¡ã¤ã«åãã¡ããã¨æ±ãã wget çãªè»¢éã½ããã¨ãã以ä¸ã®ã¹ã¯ãªããã«é¢ãã patch ã¨ãããã°ãªé¡ããã¾ãã #!/usr/bin/perl use strict; use warnings; use Encode; use Encode::Detect::Detector; use URI::Escape; use WWW::Mechanize; my @auth = qw/id pass/; sub retrieve { my $url = shift; my $with_dir = shift; my $url_readable =
{{#tags}}- {{label}}
{{/tags}}