58 foreach my $token (@tokens){ 59 if($token =~ m/HREF="([a][^\/]*)/i) { 60 my $extracted = $1; 61 if ($1 !~ m/win/i){next;} 57 if($daily_test == "daily"){ 62 if (addDaily($extracted) == 1) { } elsif($daily_test == "test"){ 62 if (addTest($extracted) == 1) { } 63 push(@buildList, $extracted); 64 } 65 } 66 67 } #end foreach