I have an input file 'abc.txt' with below text:
I need to paste the first field and the third field in different files depending on the last two digits of first field.
--> If last two digit of first field in between 0 and 15
then the output will be '
in File1.txt
--> If last two digit of first field in between 16 and 25
then the output will be '
in File2.txt
--> If last two digit of first field in between 26 and 40
then the output will be '
in File3.txt
and so on...
Now, I can do it using awk command followed by multiple if loops - but it will take a lot of processing time as the input file is huge with millions of records.
So, how can i do it using 1 single awk command?
Last edited by mystition; 03-29-2016 at 04:04 AM..
Reason: no parse tags -> code tags
Sorry if this has been posted before, I searched but not sure what I really want to do.
I have a file with records that show who has logged into my application:
2003-03-14:I:root: Log_mesg: registered servername:userid. (more after this)
I want to pull out the userid, date and time into... (2 Replies)
Hi all,
I have a flatfile
I would like to get ext = 7950 , how do I do that ?
if ($1 == "CTI-ProgramStart") {
ext = substr($9,index($9,"Extension")+11,4);
But why it is not working ???? Please help .
Thanks (1 Reply)
i have a variable 200612
the last two digits of this variable should be between 1 and 12, it should not be greater than 12 or less than 1 (for ex: 00 or 13,14,15 is not accepted)
how do i check for this conditions in a unix shell script.
thanks
Ram (3 Replies)
Hi
I have multiple files that name begins bidb_yyyymm. (yyyymm = current year month of file creation).
What I want to do is look at the files and where yyyymm is older than 1 month I want to remove the file from the server.
I was looking at looping through the files and getting the yyyymm... (2 Replies)
I have a variable '$test' that has the following string value:
$test = 123|456|789|0123
How would I select just the first element ('123') using awk.
Note: '|' is the delimiter, and the length of each field can vary.
Thanks,
- CB (3 Replies)
I have the following to find lines matching "COMPLETE" and extract parts of it using substr.
sed -n "/COMPLETE/p" 1.txt | awk 'BEGIN { FS = "\" } {printf"%s %s:%s \n", substr($3,17,3),substr($6,4,1), substr($7,4,1)}' | sort | uniq > temp.txt
Worked fine until the numbers in 2nd & 3rd substr... (5 Replies)
HI I am using awk and substr function to list out the directory names in the present working directory .
I am using below code
ls -l | awk '{ if ((substr($1,1,1)) -eq d) {print $9 }}'
But the problem is i am getting all the files and directories listed where as the requirement i wrote... (7 Replies)
Hi to all,
I'm here again, cause I need your help to solve another issue for me.
I have some files that have this name format: date_filename.csv
In my shell I must rename each file removing the date so that the file name is filename.csv
To do this I use this command:
fnames=`ls ${fname}|... (2 Replies)
Hello life savers!!
Is there any way to use substr in awk command for returning one part of a string from declared start and stop point?
I mean I know we have this:
substr(string, start, length)
Do we have anything like possible to use in awk ? :
substr(string, start, stop)
... (9 Replies)
Hi,
- In a file test.wmi
Col1 | firstName | lastName
4003 | toto_titi_CT- | otot_itit
- I want to have only ( colones $7,$13 and $15) with code 4003 and 4002. for colone $13 I want to have the whole name untill _CT- or _GC-
1- I used the command egrep with awk
#egrep -i... (2 Replies)
Discussion started by: georg2014
2 Replies
LEARN ABOUT OSX
locale::codes::currency
Locale::Codes::Currency(3pm) Perl Programmers Reference Guide Locale::Codes::Currency(3pm)NAME
Locale::Codes::Currency - standard codes for currency identification
SYNOPSIS
use Locale::Codes::Currency;
$curr = code2currency('usd'); # $curr gets 'US Dollar'
$code = currency2code('Euro'); # $code gets 'eur'
@codes = all_currency_codes();
@names = all_currency_names();
DESCRIPTION
The "Locale::Codes::Currency" module provides access to standard codes used for identifying currencies and funds, such as those defined in
ISO 4217.
Most of the routines take an optional additional argument which specifies the code set to use. If not specified, the default ISO 4217
three-letter codes will be used.
SUPPORTED CODE SETS
There are several different code sets you can use for identifying currencies. A code set may be specified using either a name, or a
constant that is automatically exported by this module.
For example, the two are equivalent:
$curr = code2currency('usd','alpha');
$curr = code2currency('usd',LOCALE_CURR_ALPHA);
The codesets currently supported are:
alpha, LOCALE_CURR_ALPHA
This is a set of three-letter (uppercase) codes from ISO 4217 such as EUR for Euro.
Two of the codes specified by the standard (XTS which is reserved for testing purposes and XXX which is for transactions where no
currency is involved) are omitted.
This is the default code set.
num, LOCALE_CURR_NUMERIC
This is the set of three-digit numeric codes from ISO 4217.
ROUTINES
code2currency ( CODE [,CODESET] )
currency2code ( NAME [,CODESET] )
currency_code2code ( CODE ,CODESET ,CODESET2 )
all_currency_codes ( [CODESET] )
all_currency_names ( [CODESET] )
Locale::Codes::Currency::rename_currency ( CODE ,NEW_NAME [,CODESET] )
Locale::Codes::Currency::add_currency ( CODE ,NAME [,CODESET] )
Locale::Codes::Currency::delete_currency ( CODE [,CODESET] )
Locale::Codes::Currency::add_currency_alias ( NAME ,NEW_NAME )
Locale::Codes::Currency::delete_currency_alias ( NAME )
Locale::Codes::Currency::rename_currency_code ( CODE ,NEW_CODE [,CODESET] )
Locale::Codes::Currency::add_currency_code_alias ( CODE ,NEW_CODE [,CODESET] )
Locale::Codes::Currency::delete_currency_code_alias ( CODE [,CODESET] )
These routines are all documented in the Locale::Codes::API man page.
SEE ALSO
Locale::Codes
The Locale-Codes distribution.
Locale::Codes::API
The list of functions supported by this module.
http://www.iso.org/iso/support/currency_codes_list-1.htm
The ISO 4217 data.
AUTHOR
See Locale::Codes for full author history.
Currently maintained by Sullivan Beck (sbeck@cpan.org).
COPYRIGHT
Copyright (c) 1997-2001 Canon Research Centre Europe (CRE).
Copyright (c) 2001 Michael Hennecke
Copyright (c) 2001-2010 Neil Bowers
Copyright (c) 2010-2012 Sullivan Beck
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.16.2 2012-10-11 Locale::Codes::Currency(3pm)