Yeah I think it was a comment. I removed it now. Thanks ;)
Jeff Pang wrote: > -----Original Message----- > >> From: Amichai Teumim <[EMAIL PROTECTED]> >> Sent: Aug 6, 2007 10:34 AM >> To: "Mr. Shawn H. Corey" <[EMAIL PROTECTED]> >> Cc: beginners@perl.org >> Subject: Re: library (random numbers) >> >> I just renamed it to obj13-1.pl from script.pl >> >> So it looks now like this: >> >> #!/usr/bin/perl >> >> use strict; >> use warnings; >> >> require 'obj13-lib.pl'; >> >> my @userArray = <STDIN>; >> >> my $sum = sumIt(@userArray); >> >> print $sum; >> >> and the library I renamed to: obj13-lib.pl and now looks like this: >> >> >> sub sumIt{ >> my $total; >> $total += $_ for @_; >> warn "@_ was empty, total undefined!\n" if !defined $total; >> } >> >> sub avg(@) >> { >> my @arr = @_; >> my $arrSize = scalar(@arr); >> > > > >> (last index). Double check >> > > I don't know what's this line.Maybe it's a comment? > > -- > Jeff Pang <[EMAIL PROTECTED]> > http://home.arcor.de/jeffpang/ > >