my $found = '';
# overparenthesised for clarity and laziness :)
map { $found || ($found = ($ext eq $_)) } @quicktime_ext;