Thanks Shawn!
The "values %{$href->{$_[0]}}" code is pretty ugly but I get it now. And it
make sense to break out of the loop as soon as you don't pass the test.
Kindest Regards,
Bill Stephenson
On Jun 4, 2012, at 12:49 PM, Shawn H Corey wrote:
> On 12-06-04 12:30 PM, Chris Stinemetz wrote:
>> I have a subroutine that I want to "return 1" only if the value of
>> %{$href->{$_[0]}} is equal to 'ND' for the whole 24 occurences.
>>
>> Any suggestions is greatly appreciated.
>>
>> Thank you,
>>
>> Chris
>>
>> sub site_offAir {
>> for (values %{$href->{$_[0]}}) {
>> return 1 if $_ eq 'ND'; #need to test all values are eq to 'ND'
>
> return if $_ ne 'ND';
>
>> }
>> return '';
>
> return 1;
>
>> }
>
>
> --
> Just my 0.00000002 million dollars worth,
> Shawn
>
> Programming is as much about organization and communication
> as it is about coding.
>
> _Perl links_
> official site : http://www.perl.org/
> beginners' help : http://learn.perl.org/faq/beginners.html
> advance help : http://perlmonks.org/
> documentation : http://perldoc.perl.org/
> news : http://perlsphere.net/
> repository : http://www.cpan.org/
> blog : http://blogs.perl.org/
> regional groups : http://www.pm.org/
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
>
>
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
