Select Code to Download

my $s = '<a href=\'2010-coachmen-mirada-bunk-house-w2-slides-for-sale-
+TX-i111851\' class=\'uviss-rv_inventoryListMoreInfoLink\'>';
if ($s =~ /href=(['"])([^\1>]+?for-sale[^\1>]+?)\1>/i) {
   print "$2\n";
}