Subj : Book, "programming in perl" To : All From : Jasen Betts Date : Sat Sep 13 2003 11:19 pm Hi All. subj. publisher "Next Handbooks" (Australia) , author Jaye Gallagher, no ISBN. This short book seems to be a good introduction to perl for programmers however some of the example code seems suspect (and it's also not on the CD) eg: Sub SumList { my ($total, $current) = (0, 0); while($current = pop); { total += $current }; return $total; } print sumlist ( 1, 2, 3, 4, 5); shouldn't that "while" be while( defined $current=pop) That aside I'm starting to see how someone could consider writing FIDO applications in perl, pack and unpack look real handy... hmm, lists can contain not only 0 but also undef. maybe this would be better Sub SumList { my $total = 0; $total += pop while(defined); return $total } or maybe use foreach instead? I'm starting to like this language. please let me know if I've made any mistakes. -=> Bye <=- --- * Origin: As King Arthur said: Some days it all seems so feudal. (3:640/1042) .