Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl function to sort a file based on key fields
Top Forums Shell Programming and Scripting Perl function to sort a file based on key fields Post 302283685 by summer_cherry on Tuesday 3rd of February 2009 10:55:02 PM
Old 02-03-2009
hi, not very clear about your requirement.

Anyway, pls try below and hope can help you some.
Code:
open FH,"<a.txt";
my @arr=<FH>;
sub usersort{
	my @t1=split(" ",$_[0]);
	my @t2=split(" ",$_[1]);
	my $a=sprintf("%s%s%s",$t1[0],$t1[1],$t1[3]);
	my $b=sprintf("%s%s%s",$t2[0],$t2[1],$t2[3]);
	return $a cmp $b;
}
print sort {usersort($a,$b)} @arr;

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Need a Help with sort a text file with some fields

Ive got a file called listacdrs with this structure: 01/09/2006 12:13 p.m. 1.046.528 CF0155.DAT 01/09/2006 12:13 p.m. 1.046.528 CF0156.DAT 01/09/2006 12:13 p.m. 1.046.528 CF0157.DAT 01/09/2006 12:13 p.m. 1.046.528 CF0158.DAT 01/09/2006 12:14 p.m. ... (3 Replies)
Discussion started by: alexcol
3 Replies

2. Shell Programming and Scripting

how to replace a text inside a file based on a xml key

<c-param> <param-name>Number</param-name> <param-value>22</param-value> <description>my house number</description> </c-param> <c-param> <param-name>Address</param-name> ... (4 Replies)
Discussion started by: reldb
4 Replies

3. Shell Programming and Scripting

sort function in perl

Hi, here is my perl script.This script creates an array and is sorting it using the in-built sort function in perl. #!/usr/local/bin/perl my number=6; my @num_arr=(1,2,3,4,5); my @array=(23,"$number","Hello",2.345,@num_arr); #printing the array print... (2 Replies)
Discussion started by: DILEEP410
2 Replies

4. UNIX for Dummies Questions & Answers

Sort the fields in a comma delimited file

Hi, I have a comma delimited file. I want to sort the fields alphabetically and again store them in a comma delimited file. For example, My file looks like this. abc,aaa,xyz,xxx,def pqr,ggg,eee,iii,qqq zyx,lmo,pqr,abc,fff and I want my output to look like this, all fields sorted... (3 Replies)
Discussion started by: swethapatil
3 Replies

5. Shell Programming and Scripting

Merge two files based on a 3rd key file

Hi, I want to merge the two files based on the key file's columns. The key file: DATE~DATE HOUSE~IN_HOUSE CUST~IN_CUST PRODUCT~PRODUCT ADDRESS~CUST_ADDR BASIS_POINTS~BASIS_POINTS ... The other 2 files are From_file & To_file - The From_file: DATE|date/time|29|9 ... (9 Replies)
Discussion started by: dips_ag
9 Replies

6. Homework & Coursework Questions

Shell script calling Perl function, sort and find data, write to new files

Use and complete the template provided. The entire template must be completed. If you don't, your post may be deleted! 1. The problem statement, all variables and given/known data: I must write a shell script that calls two external Perl functions--one of which sorts the data in a file, and... (6 Replies)
Discussion started by: kowit010
6 Replies

7. Shell Programming and Scripting

awk sort based on difference of fields and print all fields

Hi I have a file as below <field1> <field2> <field3> ... <field_num1> <field_num2> Trying to sort based on difference of <field_num1> and <field_num2> in desceding order and print all fields. I tried this and it doesn't sort on the difference field .. Appreciate your help. cat... (9 Replies)
Discussion started by: newstart
9 Replies

8. Shell Programming and Scripting

Fetch the values based on a Key using awk from single file

Hi, Please help to fetch the values for a key from below data format in linux. Sample Input Data Format 11055005|PurchaseCondition|GiftQuantity|1 11055005|PurchaseCondition|MinimumPurchase|400 11055005|GiftCatalogEntryIdentifier|Id|207328014 11429510|PurchaseCondition|GiftQuantity|1... (2 Replies)
Discussion started by: mohanalakshmi
2 Replies

9. Shell Programming and Scripting

How to Modify a file content in UNIX and sort for only required fields ?

I have the below contents in a file after making the below curl call curl ... | grep -E "state|Rno" | paste -sd',\n' | grep "Disconnected" > test "state" : "Disconnected",, "Rno" : "5554f1d2" "state" : "Disconnected",, "Rno" : "10587563" "state" : "Disconnected",, "Rno" :... (2 Replies)
Discussion started by: Vaibhav H
2 Replies

10. Shell Programming and Scripting

EBCDIC File Split Based On Record Key

I was wondering if anyone could explain to me how to split a variable length EBCDIC file into seperate files based on the record key. I have the COBOL layout, and so I need to split the file into 13 different EBCDIC files so that I can run each one through a C++ converter I have, and get the... (11 Replies)
Discussion started by: hanshot1stx
11 Replies

LEARN ABOUT DEBIAN

synce-pls

PLS(1)							   http://synce.sourceforge.net/						    PLS(1)

NAME

       pls - list directory contents

SYNOPSIS

       pls [-a] [-R] [-d LEVEL] [-p DEVNAME] [-h] [DIRECTORY]

DESCRIPTION

       pls list the contents of a directory on a device connected through SynCE.

       Forward slashes ('/') on the command line are converted to backward slashes ('').

       File attributes

	      A  Archive

	      C  Compressed

	      D  Directory

	      H  Hidden

	      I  In ROM

	      M  ROM module (can only be executed, not read!)

	      N  Normal

	      R  Read-only

	      S  System

	      T  Temporary

OPTIONS

       -d LEVEL
	      Set debug log level:

	      0 - No logging (default)

	      1 - Errors only

	      2 - Errors and warnings

	      3 - Everything

       -p DEVNAME
	      Use the device with the given name, instead of the default.

       -a     Show all files including those marked as hidden.

       -R     Recursively list subdirectories.

       -h     Display help message.

       DIRECTORY
	      The  full  path  name  to the directory. Wild cards are allowed, but only for the trailing part of the path, and should be protected
	      from the shell. If this parameter is relative, it is assumed to be relative to the "My Documents" folder. Similarly, if this parame-
	      ter is omitted, the contents of the "My Documents" folder is listed.

AUTHOR

       This manual page was written by David Eriksson <twogood@users.sourceforge.net>.

SEE ALSO

       synce(1) pcp(1) pls(1) prm(1) pmkdir(1) prmdir(1)

The SynCE project						   November 2002							    PLS(1)
All times are GMT -4. The time now is 06:29 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy