Sponsored Content
Top Forums UNIX for Beginners Questions & Answers awk unable to print array next to each other Post 303045733 by shanul karim on Saturday 11th of April 2020 07:16:01 AM
Old 04-11-2020
Dear RudC,


Thnaks after removing next.. I got the desired output.


Code:
awk -F'[;,"]' '/vc_MessageInformation/{print a["m"] "," a["n"] "," a["o"] ",";delete a}/vc_MessageInformation/{a["m"]=$2}/Message Type/{if ($4 ~ "Message Type") a["n"]=$4;{if ($6 ~ "Message Type") a["n"]=$6}}/Message Type/{if ($6 ~ "User Id") a["o"]=$6 {if ($8 ~ "User Id") a["o"]=$8;{if($5 ~ "User Identity :") a["o"]=$5}}}END{print a["m"] "," a["n"] "," a["o"] ","}' SHAPP_HC_Log > SHAPP_OUTPUT

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Unable to set a data to array

Hi All, Iam trying to set the value to the array... Still its not happening Following is the code: #!/usr/bin/ksh filenames="x"; filenames="y"; echo $filenames; echo $filenames; O/P: x x Iam expecting (2 Replies)
Discussion started by: kiranlalka
2 Replies

2. Solaris

Unable to access 3500 FC array. Where is the problem?..

Hi, I have two Sun Fire V490 with Solaris 10 5/08, FC switch and two Sun StorageTek 3500 FC arrays. Each array is connected to switch and to one server at a time. In the last week I installed Solaris 10 5/08 on both servers and set up Sun Cluster, version 3.2. At wednesday all was fine - all... (7 Replies)
Discussion started by: Sapfeer
7 Replies

3. Shell Programming and Scripting

awk: reading into an array and then print the value corresponding to index

I am beginner in awk awk 'BEGIN{for(i=1;(getline<"opnoise")>0;i++) arr=$1}{print arr}' In the above script, opnoise is a file, I am reading it into an array and then printing the value corresponding to index 20. Well this is not my real objective, but I have posted this example to describe... (19 Replies)
Discussion started by: akshaykr2
19 Replies

4. Shell Programming and Scripting

Print array into a single file - AWK

Hi all, I been looking for a solution to the fact that when I use: for (i=1; i<=NF; i++) print $ifields that are originally in a single line are printed in a single line I have severals files for which the first 7 are the same, but the number of variables after that can vary, for example NF... (5 Replies)
Discussion started by: PaulaL
5 Replies

5. Programming

Unable to assign zero to unsigned character array

Hi, I am unable to assign value zero to my variable which is defined as unsigned char. typedef struct ABCD { unsigned char abc; unsigned char def; unsigned char ghi; } ABCD; typedef ABCD *PABCD; In my Por*C code, i assign the values using memcpy like below ... (3 Replies)
Discussion started by: gthangav
3 Replies

6. Shell Programming and Scripting

Unable To access array in awk

Hi, i have the following code in which i am passing array tldn in awk using -v option & despite of that condition is not getting matched,can somebody suggest how to handle shell arrays in awk tcount=(9875 9667) awk -F"\t" -v ltldn="${tldn}" 'NR==FNR {POSTPAIDMDNS=$2"|"$3;next} ... (6 Replies)
Discussion started by: siramitsharma
6 Replies

7. UNIX for Dummies Questions & Answers

How To Print Array in awk?

Hello, May i please know how do i print the array using awk script. I am using below shell script to start with but not working. #!/bin/bash LOADSTATUS="Line 0" LOADSTATUS="Line 1" LOADSTATUS="Line 2" LOADSTATUS="Line 3" LOADSTATUS="Line 4" awk ' BEGIN { Your File Load Status }... (1 Reply)
Discussion started by: Ariean
1 Replies

8. Shell Programming and Scripting

Not getting array in .awk file and print it

I have test.sh file as below : set -A IDARR $ID echo | awk -f test.awk -v TempArr="${IDARR }" I have test.awk file as below : BEGIN { Flag = 1; } { print "Hello"; for(i in TempArr) { print i; } } (9 Replies)
Discussion started by: nes
9 Replies

9. Shell Programming and Scripting

awk to print array that occurs the most with matching value in another field

In the below awk I am splitting $7 on the : and then counting each line or NM_xxxx. If the $1 value is the same for each line then print the $7 that occurs the most with the matching $1 value. The awk seems close but I am not sure what is going on. I included a description as well as to what I... (1 Reply)
Discussion started by: cmccabe
1 Replies

10. Shell Programming and Scripting

Unable to print python array in shell script loop.

I am unable to loop print a python string array in my unix shell script: ~/readarr.sh '{{ myarr }}' more readarr.sh echo "Parameter 1:"$1 MYARRAY= $1 IFS= MYARRAY=`python <<< "print ' '.join($MYARRAY)"` for a in "$MYARRAY"; do echo "Printing Array: $a" done Can you... (10 Replies)
Discussion started by: mohtashims
10 Replies
Mail::Message::Field::Fast(3pm) 			User Contributed Perl Documentation			   Mail::Message::Field::Fast(3pm)

NAME
Mail::Message::Field::Fast - one line of a message header INHERITANCE
Mail::Message::Field::Fast is a Mail::Message::Field is a Mail::Reporter SYNOPSIS
See Mail::Message::Field DESCRIPTION
This is the faster, but less flexible implementation of a header field. The data is stored in an array, and some hacks are made to speeds things up. Be gentle with me, and consider that each message contains many of these lines, so speed is very important here. OVERLOADED
overload: ""() See "OVERLOADED" in Mail::Message::Field overload: +0() See "OVERLOADED" in Mail::Message::Field overload: <=>() See "OVERLOADED" in Mail::Message::Field overload: bool() See "OVERLOADED" in Mail::Message::Field overload: cmp() See "OVERLOADED" in Mail::Message::Field METHODS
Constructors $obj->clone() See "Constructors" in Mail::Message::Field Mail::Message::Field::Fast->new(DATA) The constructor of this object does not follow the usual practise within the Mail::Box suite: it does not use the constructor Mail::Reporter::new(). Therefor it has no logging or tracing facilities. The method can be used in one of the following ways: o new LINE Pass a LINE as it could be found in a file: a (possibly folded) line which is terminated by a new-line. o new NAME, (BODY|OBJECTS), [ATTRIBUTES] A set of values which shape the line. Create a new header field object. Specify the whole LINE at once, and it will be split-up for you. I case you already have the parts of the header line, you may specify them separately as NAME and BODY. In case you specify a single OBJECT, or a reference to an array of OBJECTS, these objects are processed to become suitable to fill a field, usually by simple strification. When you specify one or more Mail::Address objects, these are transformed into a string using their "format" method. You may also add one Mail::Message::Field, whose body is taken. In case of an array, the elements are joined into one string with a comma. ATTRIBUTES can be exactly one string which may contain multiple attributes at once, quoted and formatted as required in RFC2822. As alternative, list of key-value pairs can be used. In this case, the values will get quoted if needed and everything formatted as the protocol demands. -Option--Defined in --Default log Mail::Reporter <disabled> trace Mail::Reporter <disabled> log => LEVEL trace => LEVEL example: my $mime = Mail::Message::Field->new( 'Content-Type: text/plain; charset=US-ASCII'); my $mime = Mail::Message::Field->new( 'Content-Type' => 'text/plain; charset=US-ASCII'); my $mime = Mail::Message::Field->new( 'Content-Type' => 'text/plain', 'charset=US-ASCII'); my $mime = Mail::Message::Field->new( 'Content-Type' => 'text/plain', charset => 'Latin1'); my $mime = Mail::Message::Field->new( To => Mail::Address->new('My', 'me@example.com'); my $mime = Mail::Message::Field->new( Cc => [ Mail::Address->new('You', 'you@example.com') , Mail::Address->new('His', 'he@example.com') ]); But in practice, you can simply call my $head = Mail::Message::Head->new; $head->add( 'Content-Type' => 'text/plain' , charset => 'utf8'); which implicitly calls this constructor (when needed). You can specify the same things for Mail::Message::Head::Complete::add() as this "new" accepts. The field $obj->isStructured() Mail::Message::Field::Fast->isStructured() See "The field" in Mail::Message::Field $obj->length() See "The field" in Mail::Message::Field $obj->nrLines() See "The field" in Mail::Message::Field $obj->print([FILEHANDLE]) See "The field" in Mail::Message::Field $obj->size() See "The field" in Mail::Message::Field $obj->string([WRAP]) See "The field" in Mail::Message::Field $obj->toDisclose() See "The field" in Mail::Message::Field Access to the name $obj->Name() See "Access to the name" in Mail::Message::Field $obj->name() See "Access to the name" in Mail::Message::Field $obj->wellformedName([STRING]) See "Access to the name" in Mail::Message::Field Access to the body $obj->body() See "Access to the body" in Mail::Message::Field $obj->folded() See "Access to the body" in Mail::Message::Field $obj->foldedBody([BODY]) See "Access to the body" in Mail::Message::Field $obj->stripCFWS([STRING]) Mail::Message::Field::Fast->stripCFWS([STRING]) See "Access to the body" in Mail::Message::Field $obj->unfoldedBody([BODY, [WRAP]]) See "Access to the body" in Mail::Message::Field Access to the content $obj->addresses() See "Access to the content" in Mail::Message::Field $obj->attribute(NAME [, VALUE]) See "Access to the content" in Mail::Message::Field $obj->attributes() See "Access to the content" in Mail::Message::Field $obj->comment([STRING]) See "Access to the content" in Mail::Message::Field $obj->study() See "Access to the content" in Mail::Message::Field $obj->toDate([TIME]) Mail::Message::Field::Fast->toDate([TIME]) See "Access to the content" in Mail::Message::Field $obj->toInt() See "Access to the content" in Mail::Message::Field Other methods $obj->dateToTimestamp(STRING) Mail::Message::Field::Fast->dateToTimestamp(STRING) See "Other methods" in Mail::Message::Field Internals $obj->consume(LINE | (NAME,BODY|OBJECTS)) See "Internals" in Mail::Message::Field $obj->defaultWrapLength([LENGTH]) See "Internals" in Mail::Message::Field $obj->fold(NAME, BODY, [MAXCHARS]) Mail::Message::Field::Fast->fold(NAME, BODY, [MAXCHARS]) See "Internals" in Mail::Message::Field $obj->setWrapLength([LENGTH]) See "Internals" in Mail::Message::Field $obj->stringifyData(STRING|ARRAY|OBJECTS) See "Internals" in Mail::Message::Field $obj->unfold(STRING) See "Internals" in Mail::Message::Field Error handling $obj->AUTOLOAD() See "Error handling" in Mail::Reporter $obj->addReport(OBJECT) See "Error handling" in Mail::Reporter $obj->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK]) Mail::Message::Field::Fast->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK]) See "Error handling" in Mail::Reporter $obj->errors() See "Error handling" in Mail::Reporter $obj->log([LEVEL [,STRINGS]]) Mail::Message::Field::Fast->log([LEVEL [,STRINGS]]) See "Error handling" in Mail::Reporter $obj->logPriority(LEVEL) Mail::Message::Field::Fast->logPriority(LEVEL) See "Error handling" in Mail::Reporter $obj->logSettings() See "Error handling" in Mail::Reporter $obj->notImplemented() See "Error handling" in Mail::Reporter $obj->report([LEVEL]) See "Error handling" in Mail::Reporter $obj->reportAll([LEVEL]) See "Error handling" in Mail::Reporter $obj->trace([LEVEL]) See "Error handling" in Mail::Reporter $obj->warnings() See "Error handling" in Mail::Reporter Cleanup $obj->DESTROY() See "Cleanup" in Mail::Reporter $obj->inGlobalDestruction() See "Cleanup" in Mail::Reporter DIAGNOSTICS
Warning: Field content is not numerical: $content The numeric value of a field is requested (for instance the "Lines" or "Content-Length" fields should be numerical), however the data contains weird characters. Warning: Illegal character in field name $name A new field is being created which does contain characters not permitted by the RFCs. Using this field in messages may break other e-mail clients or transfer agents, and therefore mutulate or extinguish your message. Error: Package $package does not implement $method. Fatal error: the specific package (or one of its superclasses) does not implement this method where it should. This message means that some other related classes do implement this method however the class at hand does not. Probably you should investigate this and probably inform the author of the package. SEE ALSO
This module is part of Mail-Box distribution version 2.105, built on May 07, 2012. Website: http://perl.overmeer.net/mailbox/ LICENSE
Copyrights 2001-2012 by [Mark Overmeer]. For other contributors see ChangeLog. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html perl v5.14.2 2012-05-07 Mail::Message::Field::Fast(3pm)
All times are GMT -4. The time now is 02:46 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy