求助！！ 傳遞引用hash出錯。。

hmilymb

由于過于敏感詞 所以還是刪除吧。。。代碼在網(wǎng)絡上如下
tube8_fetcher.pl
WWW/tube8.pm

1。答疑 tube8 免費。
2。翻-墻可看

hmilymb

搞不懂亞。。。以前也不怎么懂。。求救。。

hmilymb

1. perl tube8_fetcher.pl download asian
   
2. 36 movies found.
   
3. 1/36 : http://www.tube8.com/asian/japanese-teen-yukari-fukada-rough-fucking/6809
   
4. 391/
   
5. [japanese-teen-yukari-fukada-rough-fucking_i6809391.flv]
   
6. Wrong number of arguments received at tube8_fetcher.pl line 104
   

復制代碼

kk861123

回復 3# hmilymb


    101，102行沒有問題，根據(jù)103行看104行WWW::Tube8模塊需要的參數(shù)可見%hash1不需要傳遞引用，需要的是整個hash。
所以
103.                #my $t8 = WWW::Tube8->new( url => $movie->{url}, { ua => LWP::UserAgent->new(show_progress=>1)} );

104.                my $t8 = WWW::Tube8->new(\%hash1, \%hash2);  #這里怎么寫�。。。。。。。。。。。�！
應改為
104.                my $t8 = WWW::Tube8->new(%hash1, \%hash2);  #沒有自行測試，請樓主測試看看

hmilymb

kk861123 發(fā)表于 2012-11-23 09:08
回復 3# hmilymb

傳進去后 能夠 直接 $self->url 得到url，然后ua是這樣調用的 $self->{ua}
如何做到呢？

你給出來的不行哦。。是不是不需要傳遞2個參數(shù)。。。。

kk861123

回復 5# hmilymb


     sorry，沒看到后面的www/Tube8.pm代碼

1. my $t8 = WWW::Tube8->new({ %hash1, %hash2});  

復制代碼

hmilymb

kk861123 發(fā)表于 2012-11-23 11:13
回復 5# hmilymb

1.    my $aa= {
   
2.         url => 'http://www.tube8.com/category/hoge-hoge-/00000/',
   
3.                 #        ua  => $ua, # optional
   
4.     };
   
5.       $bb = $aa;
   
6.         print Dumper($bb->{url});
   
7.    

復制代碼

$bb->{url} 可以打印 'http://www.tube8.com/category/hoge-hoge-/00000/
但是如何  操作才能得到  $bb->url 等于 'http://www.tube8.com/category/hoge-hoge-/00000/

$bb = \$aa ?
就是這里不懂。。

kk861123

回復 7# hmilymb


   我想你應該去研究這一段代碼：

1. 11.use base qw(Class::Accessor::Fast);
   
2. 
   
3. 12.__PACKAGE__->mk_accessors(
   
4. 
   
5. 13.    qw( flv thumb get_3gp
   
6. 
   
7. 14.        url id title title_inurl
   
8. 
   
9. 15.        category category_url duration related_videos )
   
10. 
    
11. 16.);
    
12. 
    

復制代碼

hmilymb

kk861123 發(fā)表于 2012-11-23 11:55
回復 7# hmilymb

好的謝謝。

gaoyang636

lz的腳本是用來做“成人做的事情”的……
竟然木有人發(fā)現(xiàn)……要是發(fā)在網(wǎng)易那種地方，得涌現(xiàn)多少神評論啊 :wink:
我也很喜歡 Rio 這位日本女演員……
這個網(wǎng)站倒是以前木有聽說過，是免費的么……