SVN: toys/rsget.pl/Audio/GoEar

sparky sparky at pld-linux.org
Thu Mar 11 01:08:33 CET 2010


Author: sparky
Date: Thu Mar 11 01:08:32 2010
New Revision: 11233

Modified:
   toys/rsget.pl/Audio/GoEar
Log:
- update for structure changes


Modified: toys/rsget.pl/Audio/GoEar
==============================================================================
--- toys/rsget.pl/Audio/GoEar	(original)
+++ toys/rsget.pl/Audio/GoEar	Thu Mar 11 01:08:32 2010
@@ -19,11 +19,10 @@
 start:
 	GET( $-{_uri} );
 
-	! m{<param name="FlashVars" value="file=([0-9a-f]+)" />};
+	! m{<object.*?><embed src=".*?swf\?file=([0-9a-f]+)"};
 	my $id = $1;
-	my $first = substr $id, 0, 1;
 
-	GET( "/files/xmlfiles/$first/secm$id.xml" );
+	GET( "/localtrackhost.php?f=$id" );
 
 	! m{<song path="(.*?)" bild=".*?" artist="(.*?)" title="(.*?)"/>};
 	my ( $file_uri, $artist, $title ) = ( $1, $2, $3 );


More information about the pld-cvs-commit mailing list