my $element;
foreach $element (@set_of_numbers)
{
    last if $element < $critical_value;
}
print "$element is below the critical value.\n";