Changeset 2024

Show
Ignore:
Timestamp:
03/15/08 21:31:51
Author:
youpy
Message:
  • update for zShare's specification change
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/assets/plugins/Filter-FindEnclosures/zshare.pl

    r1996 r2024  
    99    my $uri = $args->{url}; 
    1010    $uri =~ s/audio/download/; 
    11     my $response = LWP::UserAgent->new->post( 
    12         $uri, 
    13         ['download' => 1]); 
    14     if($response->content =~ m/('h','t','t','p'.+?')\);link/) { 
     11    my $response = LWP::UserAgent->new->get($uri); 
     12    if($response->content =~ m/link = '(http:\/\/.+\.zshare\.net\/download\/[^']+?)';/) { 
    1513        my $enclosure_url = $1; 
    16         $enclosure_url =~ s/[',]//g; 
    1714        my $enclosure = Plagger::Enclosure->new; 
    1815        $enclosure->url($enclosure_url);