Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: How to make perl sort these values in order?

by james2vegas (Chaplain)
on Aug 07, 2011 at 00:41 UTC ( #919009=note: print w/ replies, xml ) Need Help??


in reply to How to make perl sort these values in order?

First off you should chomp the values you get from readline (<>), then sort them, the default sort is not numeric so something like:

#!/usr/bin/perl use strict; use warnings; print "Type in a number."; chomp(my $n1 = <>); print "Type in another number."; chomp(my $n2 = <>); print "Type in another number."; chomp(my $n3 = <>); print "Type in another number."; chomp(my $n4 = <>); print "Type in another number."; chomp(my $n5 = <>); print "$_\n" for sort { $a <=> $b } ($n1,$n2,$n3,$n4,$n5);
I also added the use strict; use warnings;

You should consider chomping in a loop into an array.


Comment on Re: How to make perl sort these values in order?
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (14)
As of 2015-07-29 20:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (268 votes), past polls