Perl: sorting by string

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl Sorting Help

Hey guys, I have started to learn perl recently because of a position I took. They want me to master perl and I've been reading books and practicing myself. Basically I,m having my perl script run through a text pad and give the output in a special way e.g input deviceconfig { ...

2. Shell Programming and Scripting

HELP on Perl array / sorting - trying to convert Korn Shell Script to Perl

Hi all, Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM. Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers. At the moment am...

3. Shell Programming and Scripting

string sorting in unix

Hi I need how to sort string characters for Example i have a file that contains this data example string "fan" but i want to display "afn" contained words "afn" is in sorted format for fan. File data faty gafny gaifny dafan gafnniunt O/p gafny gafnniunt

4. Shell Programming and Scripting

[Perl] Sorting an String-Array

Hi, i have a txtfile with the format <Nr>tab<word>tab<other stuff>new line and i want to sort the <word>-colum with a perl script. My textfile: <Nr>tab<word>tab<other stuff>new line 6807 die ART.Acc.Sg.Fem 6426 der ART.Gen.Sg.Fem 2 die ART.Nom.Sg.Fem 87 auf APPR.-- 486 nicht PTKNEG.--...

5. Shell Programming and Scripting

perl sorting variables

Good morning!! Im trying to practice withe Perl and sorting variables is not going good at all! #!/usr/bin/perl $username = $ENV {'LOGNAME'}; print "Hello, $username\n"; I want to add sort and 'mail' and 'home'. This below is what I have came up with,but of course its not working. ...

6. Shell Programming and Scripting

Perl sorting

Hi, I have a file in this format: a b c d e a b c d e a b c d e i need perl script to sort 2nd column in alphabatical order The script i use is #!/usr/bin/perl my @words=<>; foreach(sort mysort @words) { print;

7. Shell Programming and Scripting

Sorting an address string

I'm in an introduction to Unix class and well I'm kind of stuck on one part of the lab for this week or shell scripts. Basically we're given a file named address.data and we're supposed to create a script to sort it according to zip code, last name, and first name (not at the same time of course)....

8. Shell Programming and Scripting

PERL data - sorting

Hello, I have a page where multiple fields and their values are displayed. But I am able to sort only a few fields. When I looked into the issue, it is seen that the for each row of info , an unique id is generated and id.txt is generated and saved. Only those fields which are inside that id.txt...

9. Shell Programming and Scripting

perl sorting

I have many files that I need to sort each week. I know how to do in Unix, but for this task it appears best to do native inside an existing perl program. So, simplified, I have a file similar to the following: Joe_________12_Main_St__A001________LX Benny_______5_Spring____A002________LX...

10. UNIX for Advanced & Expert Users

Sorting a string

Hello all, I have some 20-digit strings - say 1234567890abcdefghij I want to remove the 3rd and then the 11-18th strings, but leave a space between the two resulting strings eg "3 abcdefgh" I only know how to use "cut", does anyone know any way I can do this? All these strings are in the same...

LEARN ABOUT DEBIAN

sort::key::maker

Sort::Key::Maker(3pm)					User Contributed Perl Documentation				     Sort::Key::Maker(3pm)

NAME

       Sort::Key::Maker - multikey sorter creator

SYNOPSYS

	 # create a function that sorts strings by length:
	 use Sort::Key::Maker sort_by_length => sub { length $_},  qw(integer);

	 # create a multikey sort function;
	 # first key is integer sorted in descending order,
	 # second key is a string in default (ascending) order:
	 use Sort::Key::Maker ri_s_keysort => qw(-integer string);

	 # some sample data...
	 my @foo = qw(foo bar t too tood mama);

	 # and now, use the sorter functions previously made:

	 # get the values on @foo sorted by length:
	 my @sorted = sort_by_length @foo;

	 # sort @foo inplace by its length and then by its value:
	 ri_s_keysort_inplace { length $_, $_ } @foo;

DESCRIPTION

       Sort::Key::Maker is a pragmatic module that provides an easy to use interface to Sort::Key multikey sorting functionality.

       It creates multikey sorting functions on the fly for any key type combination and exports them to the caller package.

       The key types natively accepted are:

	 string, str, locale, loc, integer, int,
	 unsigned_integer, uint, number, num

       and support for other types can be added via Sort::Key::Register (or also via Sort::Key::register_type()).

   USAGE
       use Sort::Key::Maker foo_sort => @keys;
	   exports two subroutines to the caller package: "foo_sort (&@)" and "foo_sort_inplace (&@)".

	   Those two subroutines require a sub reference as their first argument and then respectively, the list to be sorted or an array.

	   For instance:

	     use Sort::Key::Maker bar_sort => qw(int int str);

	     @bar=qw(doo tomo 45s tio);
	     @sorted = bar_sort { unpack "CCs", $_ } @bar;
	     # or sorting @bar inplace
	     bar_sort_inplace { unpack "CCs", $_ } @bar;

       use Sort::Key::Maker foo_sort => &genmultikey, @keys;
	   when the first argument after the sorter name is a reference to a subroutine it is used as the multikey extraction function. The
	   generated sorter functions doesn't require neither accept one, i.e.:

	     use Sort::Key::Maker sort_by_length => sub { length $_ }, 'int';
	     my @sorted = sort_by_length qw(foo goo h mama picasso);

SEE ALSO

       Sort::Key, Sort::Key::Register.

       Sort::Maker also available from CPAN provides similar functionality.

AUTHOR

       Salvador Fandin~o, <sfandino@yahoo.com>

COPYRIGHT AND LICENSE

       Copyright (C) 2005 by Salvador Fandin~o

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.4 or,
       at your option, any later version of Perl 5 you may have available.

perl v5.14.2							    2010-04-16						     Sort::Key::Maker(3pm)

Shell Programming and Scripting