http://www.perlmonks.org?node_id=195228


in reply to (OT) Interview questions -- your response?

I know! I know!

1a. Because the compiler ignored the mismatched 'end for' and instead put all of the code up to the next 'end foreach' into the inner loop.

1b. Get a compiler with better error handling.

2.

sub sum { return md5sum(join('',@_)); } my @non_in_place = reverse @array; my $correct = sum(@non_in_place); while ($correct ne sum(@array)) { ($a,$b)=(rand(@array),rand(@array)); @array[$a,$b] = @array[$b,$a]; }
3. <FORM ACTION="http://www.perlmonks.org/">...</FORM> It seems to satisfy your criteria, as long as you're not too picky about whose database you're querying.