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

Re: Alphabetical order with .txt file

by lemming (Priest)
on Apr 17, 2002 at 01:21 UTC ( #159694=note: print w/ replies, xml ) Need Help??


in reply to Alphabetical order with .txt file

Like grep says: use strict; use warnings;

That won't catch your problem though. You're adding a space with @list1[$nk] = "$item1 \n";. Try dropping the space before the newline.

Other concerns:

  • @list1[$nk] is better written as $list1[$nk] ; Though just until Perl 6
  • You currently read the file
    Then sort (though it's not shown)
    write the file
    read it
    and then display it
  • Try reading it
    sorting it
    displaying it and writing it at the same time
  • IIRC, $#list1 notation is being dropped. Just go ahead and use @list1 for # of elements. scalar @list1 is you need to.
  • Another version of your code is in my pad
    I'll leave that there for your review for now

Update: boo has an excellent point. I just glossed by that point.


Comment on Re: Alphabetical order with .txt file
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (7)
As of 2015-07-30 06:36 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 (270 votes), past polls