$ cat finput.data
DD142 0_1 DD142_A DD142_B A B
DD142 1_1 DD142_B DD142_C B C
DD142 2_1 DD142_A DD142_C A C
DD142 3_1 DD142_A A
DD142 3_2 DD142_A A
DD142 4_1 DD142_B B
DD142 4_2 DD142_B B
DD142 5_1 DD142_C C
DD142 5_2 DD142_C C
DD709 0_1 DD709_A DD709_B A B
DD709 1_1 DD709_B DD709_C B C
DD709 2_1 DD709_A DD709_C A C
$ awk '$(NF-1) == "A" && $NF == "C" {$3=$4}NF=3' finput.data
DD142 0_1 DD142_A
DD142 1_1 DD142_B
DD142 2_1 DD142_C
DD142 3_1 DD142_A
DD142 3_2 DD142_A
DD142 4_1 DD142_B
DD142 4_2 DD142_B
DD142 5_1 DD142_C
DD142 5_2 DD142_C
DD709 0_1 DD709_A
DD709 1_1 DD709_B
DD709 2_1 DD709_C
Regards.
Hello disedorgue,
If Number of fields are less than 6 and last 2 columns have values A and C so above solution will work then
also(which I guess pareshkp doesn't want seems user want to exchange only DD values) so adding a minor condition to it.
Hi All,
I am having trouble through, I am reading the input from tab delimited file containing several records,
e.g.
line1 field1 field2 field3 so on..
line2 field1 field2 field3 so on..
..
..
on the basis of certain fields for each record in input file, I have to retrieve... (1 Reply)
Hi Guys,
Input.txt
L194 A -118.2
L194 B -115.1
L194 C -118.7
L196 A 0
L196 C 0
L197 A -111.2
L197 B -118.9
L197 C -119.9
L199 A -120.4
L199 B -119.9 ... (2 Replies)
HI
I have input file A.txt
X
Y
Z
File B.txt
1 X 10 AAA 11123
2 Y 22 PlD 4563
3 Z 55 PlD 54645
4 Z 66 PlD 15698
5 F 44 PlD 154798
6 C 55 PlD 12554
7 Z 88 PlD 23265
8 C 99 PlD 151654
9 C 11 PlD 21546546
I need New File C.txt (1 Reply)
Greetings!
I need a quick way to change the format in a table of data
Here is an example of the input:
10 72 Value=177 VDB=0.0245 Value4=0,0,171,0
10 274 Value=238 VDB=0.0433 Value4=29,0,205,0
10 312 Value=222 VDB=0.0384 Value4=8,0,190,19
10 540 Value=405 VDB=0.0391 Value4=13,30,153,195... (3 Replies)
HI
Want to grep data from column header and match with second file.
File A.txt
1 2 3 4 5 6
X1 A L D J Q R
X2 B M K P w T
X3 C S L P e Y
X4 R Z M A r U
FileB.txt
1
2
3
4
6
7 (3 Replies)
Hello,
I have this file outputData:
# cat /tmp/outputData
__Capacity^6^NBSC01_Licences^L3_functionality_for_ESB_switch
__Capacity^2100^NBSC01_Licences^Gb_over_IP
__Capacity^1837^NBSC01_Licences^EDGE_BSS_Fnc
__Capacity^1816^NBSC01_Licences^GPRS_CS3_and_CS4... (1 Reply)
Input :-
Column to Row
Time CT 1 2 3
17:45 X 10 15 20
18:00 X 15 20 30
18:15 X 10 10 10
18:30 X 5 5 5
17:45 Y 10 15 20
18:00 Y 15 20 30
18:15 Y 10 10 10
18:30 Y 5 5 5
output:-
Time P X Y
17:45 1 10 10
18:00 1 15 15
18:15 1 10 10 (2 Replies)
Discussion started by: pareshkp
2 Replies
LEARN ABOUT MOJAVE
locale::codes::langext
Locale::Codes::LangExt(3pm) Perl Programmers Reference Guide Locale::Codes::LangExt(3pm)NAME
Locale::Codes::LangExt - standard codes for language extension identification
SYNOPSIS
use Locale::Codes::LangExt;
$lext = code2langext('acm'); # $lext gets 'Mesopotamian Arabic'
$code = langext2code('Mesopotamian Arabic'); # $code gets 'acm'
@codes = all_langext_codes();
@names = all_langext_names();
DESCRIPTION
The "Locale::Codes::LangExt" module provides access to standard codes used for identifying language extensions, such as those as defined in
the IANA language registry.
Most of the routines take an optional additional argument which specifies the code set to use. If not specified, the default IANA language
registry codes will be used.
SUPPORTED CODE SETS
There are several different code sets you can use for identifying language extensions. 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:
$lext = code2langext('acm','alpha');
$lext = code2langext('acm',LOCALE_LANGEXT_ALPHA);
The codesets currently supported are:
alpha
This is the set of three-letter (lowercase) codes from the IANA language registry, such as 'acm' for Mesopotamian Arabic.
This is the default code set.
ROUTINES
code2langext ( CODE [,CODESET] )
langext2code ( NAME [,CODESET] )
langext_code2code ( CODE ,CODESET ,CODESET2 )
all_langext_codes ( [CODESET] )
all_langext_names ( [CODESET] )
Locale::Codes::LangExt::rename_langext ( CODE ,NEW_NAME [,CODESET] )
Locale::Codes::LangExt::add_langext ( CODE ,NAME [,CODESET] )
Locale::Codes::LangExt::delete_langext ( CODE [,CODESET] )
Locale::Codes::LangExt::add_langext_alias ( NAME ,NEW_NAME )
Locale::Codes::LangExt::delete_langext_alias ( NAME )
Locale::Codes::LangExt::rename_langext_code ( CODE ,NEW_CODE [,CODESET] )
Locale::Codes::LangExt::add_langext_code_alias ( CODE ,NEW_CODE [,CODESET] )
Locale::Codes::LangExt::delete_langext_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.iana.org/assignments/language-subtag-registry
The IANA language subtag registry.
AUTHOR
See Locale::Codes for full author history.
Currently maintained by Sullivan Beck (sbeck@cpan.org).
COPYRIGHT
Copyright (c) 2011-2013 Sullivan Beck
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.18.2 2013-11-04 Locale::Codes::LangExt(3pm)