Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re^2: Help with arrays

by perlguru22 (Acolyte)
on Sep 22, 2012 at 06:27 UTC ( #995056=note: print w/ replies, xml ) Need Help??

in reply to Re: Help with arrays
in thread Help with arrays

I think I Finally figured it out =)

#!/usr/bin/perl use warnings; $sum = 0; @nums = (); push (@nums,(4,4)); $sum += $_ for @nums; $size = @nums; $average = $sum / $size; print "$average";
This worked I am not sure if it's the correct way but it gave me the average

Comment on Re^2: Help with arrays
Download Code
Replies are listed 'Best First'.
Re^3: Help with arrays
by Kenosis (Priest) on Sep 22, 2012 at 06:37 UTC

    Yes--well done!

    ...I am not sure if it's the correct way...

    Tim Toady!

    If I may, however, offer the following for you to consider:

    #!/usr/bin/perl use strict; use warnings; my $sum = 0; my @nums = (); push( @nums, ( 4, 8 ) ); $sum += $_ for @nums; my $size = @nums; my $average = $sum / $size; print "$average";
Re^3: Help with arrays
by Kenosis (Priest) on Sep 22, 2012 at 06:42 UTC

    My the above message.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://995056]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (9)
As of 2016-02-08 15:19 GMT
Find Nodes?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?

    Results (276 votes), past polls