Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sdd.hp.com!wuarchive!usc!elroy.jpl.nasa.gov!jpl-devvax!sharon From: sharon@jpl-devvax.JPL.NASA.GOV (Sharon Hopkins) Newsgroups: comp.lang.perl Subject: Re: Arithmetic functions Message-ID: <11579@jpl-devvax.JPL.NASA.GOV> Date: 25 Feb 91 17:39:00 GMT References: <1991Feb20.113935.14427@pronto.mh.nl> <2069019@bfmny0.BFM.COM> <1991Feb23.001155.3630@convex.com> Reply-To: sharon@jpl-devvax.JPL.NASA.GOV (Sharon Hopkins) Distribution: comp Organization: Jet Propulsion Laboratory, Pasadena, CA Lines: 12 In article <1991Feb23.001155.3630@convex.com> tchrist@convex.COM (Tom Christiansen) writes: >...I remember once wanting an abs function, but I contented myself with: > > sub abs { ($_[0] < 0) ? -$_[0] : $_[0]; } > I guess I won't post my article asking for abs(EXPR) after all. What is it with this newsgroup, that all my questions get answered before I manage to ask them? :-) Sharon Hopkins sharon@jpl-devvax.Jpl.Nasa.Gov