11-30-2006
if within nawk command
I am trying to nawk through a file and if the 24.25.26 charachters in the file are "000" then print a line to a new file in one format, otherwise print a line in a different format.
So far I have the following:
nawk '/^1/ {
if(substr($0,24,3) != 000) printf("%.5d%s\n",NR-1,"0"substr($0,14,13)"XXX"substr($0,2,6)substr($0,32,7)"+"" XXXXXXXX""XXXX "" ""N")
else printf("%.5d%s\n",NR-1,"0"substr($0,14,10)"801""XXXX"substr($0,2,6)substr($0,32,7)"+"" XXXXXXXX""XXXX "" ""N")
fi
}' filename >> newfile
however this is reulting in a syntax error as follows, due to the if statement:
Can anyone confirm the correct syntax for an if/else statement within a nawk command.
Thanks.
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
I am using the following command.
nawk '$1==p{$2=sprintf("%09d",$2+1)};1' p=$JOB_NUM q=$LEN $VALUE_TABLE > ./TEMP_TABLE
As you can see the code above, I basically read a value from the table VALUE_TABLE and select a particular row based on searching the value JOB_NUM. Now Actually the... (2 Replies)
Discussion started by: Tux_Raju
2 Replies
2. Shell Programming and Scripting
Guys, i have an issue. I tried to ran a script and the whole thing was fine.. except when i came to a part,
nawk '
BEGIN {
machine=0
then system prompted that the nawk command was not to be found...
I tried looking for the nawk command by using the "locate" command, and it returns... (5 Replies)
Discussion started by: 12yearold
5 Replies
3. Shell Programming and Scripting
Hello
I have facing issue while using cp command inside nawk block.
#!/bin/ksh
my_name=$1
nawk -v my_name1=$my_name 'BEGIN {
n = split(my_name1,names,":");
for (i=1;i<=n;i++)
{
print names;
cpcmd = "cp " /tmp/test.txt" " ./sample
system(cpcmd)
}
exit
}'
exit 0
i'am getting... (1 Reply)
Discussion started by: piscean_n
1 Replies
4. Shell Programming and Scripting
what is this nawk doing?
This is for solaris 10 with trusted extensions.
Level=$(plabel | nawk 'BEGIN {FS='\*"} {PRINT $2}' )
it is supposed to return UNCLASSIFIED or whatever the zone label is.
I understant $() execute this stuff, FS is field separator, print the 2nd field.
Can... (1 Reply)
Discussion started by: djehres
1 Replies
5. Shell Programming and Scripting
I have a nawk command I use in Solaris....
ps -e -o comm | nawk -F'ora_pmon_' 'NF>1 {print $2}'
However it seems that this command will not work in Linux.
Linux bluemarron 2.6.16.54-0.2.12-smp #1 SMP Fri Oct 24 02:16:38 UTC 2008 x86_64 x86_64 x86_64 GNU/Linux
How could I do the same... (2 Replies)
Discussion started by: LRoberts
2 Replies
6. Shell Programming and Scripting
i am matching two files.
the files are in the format
file_1.txt
1|_|X|_|
2|_|W|_|
3|_|Y|_|
4|_|Z|_|
5|_|U|_|
file_2.txt
W|_|A|_|
Z|_|C|_|
V|_|B|_|
X|_|D|_|sdff|_|
Y|_|
file_3.txt should be in the format (4 Replies)
Discussion started by: centurion_13
4 Replies
7. Shell Programming and Scripting
Hi,
I am using NAWK command to scan a file (test.txt) and to create new files based on the length of lines in the file test.txt.
My requirement is I need to create test_good with records having line lenght less than 4
and to create test_bad with records having line lenght more than 4. I... (4 Replies)
Discussion started by: sbhuvana20
4 Replies
8. Shell Programming and Scripting
Hi All
We are migrating our projects from unix environment to linux. I tried running a install script which sets up my project, i.e. the directory structure and all. But in the middle of the script i started receiveing following error : nawk: command not found .
So i need to know which... (1 Reply)
Discussion started by: vee_789
1 Replies
9. Shell Programming and Scripting
Hi
I have this command, which counts number of lines in a specific file and then prints it on screen.nawk 'NF{c++}END{print "Number of GPS coordinates in file: "c}' $filename
I would like to have the output put into a variable, but can't seem to find the correct argument for it.
How do I... (3 Replies)
Discussion started by: bulleteyedk
3 Replies
10. UNIX for Beginners Questions & Answers
Hi Folks,
I am struggling to understand nawk command which was used by another developer.
Can you please explain what each character or string is doing here below:
if ; then (3 Replies)
Discussion started by: kirans.229
3 Replies
LEARN ABOUT DEBIAN
unicode::gcstring::ja_jp
Unicode::GCString::JA_JP(3pm) User Contributed Perl Documentation Unicode::GCString::JA_JP(3pm)
NAME
Unicode::GCString::JA_JP - UAX #29 XXXXXXXXXXXXXXXX
SYNOPSIS
use Unicode::GCString;
$gcstring = Unicode::GCString->new($string);
DESCRIPTION
Unicode::GCString XUnicodeXXXXXUnicodeXXXXX29 [UAX #29] XXXXXXXXXXXXXXXXXXextended grapheme clusterXXXXXXXXX
XXXXXXXXgrapheme clusterXXXUnicodeXXXXXXXXXXXXXXXXgrapheme baseXXXXXXXXXXXXXXXXXgrapheme extenderXXXX/XXXXXXXXXXXprependX
characterXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXX
XXXXXXX
new (STRING, [LINEBREAK])
XXXXXXXX UnicodeXXX STRING XXXXXXXXXXXXXXX (Unicode::GCString XXXXXX) XXXX XXXXXX Unicode::LineBreak XXXXXX LINEBREAK XXXXXXXXXXXX
copy
XXXXXXXXXXX XXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXX
XX
chars
XXXXXXXXXXX XXXXXXXXXXXXXXXUnicodeXXXXXXXXUnicodeXXXXXXXXXXXXX
columns
XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXX "DESCRIPTION" in Unicode::LineBreak::JA_JP XXXX
length
XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXX
as_string
"""OBJECT"""
XXXXXXXXXXX XXXXXXXXXXXXXXXUnicodeXXXXXXXXX
cmp (STRING)
STRING "cmp" STRING
XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXUnicodeXXXXXXXX
concat (STRING)
STRING "." STRING
XXXXXXXXXXX XXXXXXXXXXXXXXXX STRING XXXXXXUnicodeXXXXXXXX XXXXXXXXX (columns() XXX) XXXXXXXXXX (length() XXX)
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
join ([STRING, ...])
XXXXXXXXXXX STRING XXXXXXXXXXXXXXXXXXXXXX STRING XXXX UnicodeXXXXXXXXXXX
substr (OFFSET, [LENGTH, [REPLACEMENT]])
XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXX OFFSET X LENGTH XXXXXXXXXXXXX REPLACEMENT XXXXXXXXXXXXXXXXXXXXXX REPLACEMENT X UnicodeXXXXXXXX
XXXXXXXXXXXXXXX
as_array
"@{"OBJECT"}"
as_arrayref
XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
eos XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXX
item ([OFFSET])
XXXXXXXXXXX OFFSETXXXXXXXXXXXXXX OFFSET XXXXXXXXXXXXXXXXXXXXXXXXXXX
next
"<"OBJECT">"
XXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX
pos ([OFFSET])
XXXXXXXXXXX OFFSET XXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX
XXXXXXXXX
flag ([OFFSET, [VALUE]])
XXXXXXXXXXX OFFSETXXXXXXXXXXXXXXXXXXXXXXXX OFFSET XXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXX 255 XXXXXXXXXXXXXXX 0X
XXXXXXXXXXXXXXXXXX
Unicode::LineBreak::ALLOW_BEFORE
XXXXXXXXXXXXXXXXXXXX
Unicode::LineBreak::PROHIBIT_BEFORE
XXXXXXXXXXXXXXXXXXXXXX
lbclass ([OFFSET])
OFFSETXXXXXXXXXXXXXXXXXXXXXXX (Unicode::LineBreak::JA_JP XX) XXXX OFFSET XXXXXXXXXXXXXXXXXXXXXXXXXXX
X: lbc() XXXXXXXX
lbclass_ext ([OFFSET])
OFFSETXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX (Unicode::LineBreak XX) XXXX XXXXXXXXXXXXXXXXXXXXX CM XXXXXlbclass() XXXXXX
X: lbcext() XXXXXXXX
XXX
lbc XXXXXXXXXXXXXXXXXXXXXXX (Unicode::LineBreak::JA_JP XX) XXXX
lbcext
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX (Unicode::LineBreak::JA_JP XX) XXXX XXXXXXXXXXXXXXXXXXXXX CM XXXXX XXXXXXXXXXXXXXXXXXX
CAVEATS
o XXXXXXXXXXXXXXXXXXXXXX (XXXXXXXXX)X
o Perl X 5.10.1 XXXXXXXUnicode::GCString XXXXXXXX Unicode XXXXXXXXXXX "utf8_mg_pos_cache_update" XXXXXXXXXXXXXXXXX
XXXXXXXXXXX
$sub = substr($gcstring, $i, $j);
XXXXXXXXXXXXXXXXXXX
$sub = substr("$gcstring", $i, $j);
$sub = substr($gcstring->as_string, $i, $j);
o XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXtailoringXXXXXXXXXXXXXXXX
VERSION
$VERSION XXXXXXXXXXX
XXXXXXXXXXXX http://hatuka.nezumi.nu/repos/Unicode-LineBreak/ <http://hatuka.nezumi.nu/repos/Unicode-LineBreak/> XXXX
SEE ALSO
[UAX #29] Mark Davis (2009-2010). Unicode Standard Annex #29: Unicode Text Segmentation, Revision 15-17.
<http://www.unicode.org/reports/tr29/>.
AUTHOR
Hatuka*nezumi - IKEDA Soji <hatuka(at)nezumi.nu>
COPYRIGHT
Copyright (C) 2009-2012 Hatuka*nezumi - IKEDA Soji.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-03-24 Unicode::GCString::JA_JP(3pm)