"John W. Krahn" schreef: > my$mean=(map$a+=$_/@data,@data)[-1];
my$mean;mean+=$_/@data [EMAIL PROTECTED]; -- Affijn, Ruud "Gewoon is een tijger." -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>