Sponsored Content
Top Forums Shell Programming and Scripting How to get fields and get output with awk or shell script.? Post 302731351 by Chubler_XL on Wednesday 14th of November 2012 09:14:08 PM
Old 11-14-2012
Try these 2:

Code:
awk -F\| '{
  sub(/.*Locations /,"",$3)
  path=val=$3
  sub(/,.*/,"",val)
  val+=10
  sub(/ for.*/,"",$3)
  sub(/.*NET/, "NET",path)
  sub(/\.qt.*/, ".qt",path)
  print $1 FS ($2=="16"?"":$2 FS) " Locations " $3 FS path FS $6 FS $7 val}' A.txt > B.txt

Code:
awk -F\| '{
  sub(/.*Locations /,"",$3)
  sub(/ for.*/,"",$3)
  L=$6
  M[L]=$2
  gsub(/, /,"|",$3)
  $0=$3
  for(i=1;i<=NF;i++) H[L,$i]
}
END {
   for(L in M) {
      V=""
      for(i=0;i<M[L];i++) if(!((L SUBSEP i) in H)) V=V", "i
      if(length(V)) print "Locations " substr(V,3) "|" L "|Available"
   }
}' A.txt > C.txt

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

AWK Merge Fields for Print Output

I've got a file with each record on a separate line and each record contains 34 fields separated by a colon and i'm trying to re-arrange the order of the fields and merge together certain fields separated by a slash (like field7/field28). I tried using an awk print statement like awk -F: 'BEGIN... (5 Replies)
Discussion started by: RacerX
5 Replies

2. Shell Programming and Scripting

awk script to (un)/concatenate fields in file

Hi everyone, I'm trying to use the "join" function for more than 1 field. Since it's not possible as it is, I want to take my input files and concatenate the joining fields as 1 field (separated by "|"). I wrote 2 awk script to do and undo it (see below). However I'm new to awk and I'm certain I... (5 Replies)
Discussion started by: anthony.cros
5 Replies

3. Shell Programming and Scripting

AWK Compare files, different fields, output

Hi All, Looking for a quick AWK script to output some differences between two files. FILE1 device1 1.1.1.1 PINGS device1 2.2.2.2 PINGS FILE2 2862 SITE1 device1-prod 1.1.1.1 icmp - 0 ... (4 Replies)
Discussion started by: stacky69
4 Replies

4. Shell Programming and Scripting

awk to compare diff output by fields

Diff output as follows: < AAA BBB CCC DDD EEE 123 > PPP QQQ RRR SSS TTT 111 > VVV WWW XXX YYY ZZZ 333 > AAA BBB CCC DDD EEE 124 How can i use awk to compare the last field to determine if the counter has increased, and need to ensure that the first 4 fields must have the same... (15 Replies)
Discussion started by: ux4me
15 Replies

5. Shell Programming and Scripting

Aligning output with null fields in shell script

Hello Gurus ! I have what probably amounts to a few simply changes to fix; however for the life of me I cannot seem to get it ti work. I need to align the output of my script (I am writing to a logfile)... here's the lines in my code: if then echo "NODE: $node" >> $logfile... (6 Replies)
Discussion started by: gvolpini
6 Replies

6. Shell Programming and Scripting

awk help: Match data fields from 2 files & output results from both into 1 file

I need to take 2 input files and create 1 output based on matches from each file. I am looking to match field #1 in both files (Userid) and create an output file that will be a combination of fields from both file1 and file2 if there are any differences in the fields 2,3,4,5,or 6. Below is an... (5 Replies)
Discussion started by: ambroze
5 Replies

7. Shell Programming and Scripting

XML Fields comparison using awk script

Hello All, I have many zipped XMLs (example file name in tgz formate - file_rec.trx.2016-01-23.000123.exc.85sesdzd45wsds5299c8f2994f7.tgz) looks following and I need to verify two numbers, they are RecordNumber and EnrolData (only sequence number, NOT hole). for all the records, both should be... (5 Replies)
Discussion started by: VasuKukkapalli
5 Replies

8. Shell Programming and Scripting

Shell script to pull certain fields

I/m a beginner so be easy. I have text files that live on an AIX server. The files come in and I've been charged with writing a shell script to email out that pulls the first date, and the last date of the file. I need to load these 2 dates into 2 separate variables. I can figure out the variables,... (13 Replies)
Discussion started by: mattadams1983
13 Replies

9. Shell Programming and Scripting

awk to output match and mismatch with count using specific fields

In the below awk I am trying output to one file those lines that match between $2,$3,$4 of file1 and file2 with the count in (). I am also trying to output those lines that are missing between $2,$3,$4 of file1 and file2 with the count of in () each. Both input files are tab-delimited, but the... (7 Replies)
Discussion started by: cmccabe
7 Replies

10. UNIX for Beginners Questions & Answers

Shell script to call and sort awk script and output

I'm trying to create a shell script that takes a awk script that I wrote and a filename as an argument. I was able to get that done but I'm having trouble figuring out how to keep the header of the output at the top but sort the rest of the rows alphabetically. This is what I have now but it is... (1 Reply)
Discussion started by: Eric7giants
1 Replies
X11Font(3pm)						User Contributed Perl Documentation					      X11Font(3pm)

NAME
Tk::Font - a class for finding X Fonts SYNOPSIS
use Tk::X11Font; $font = $widget->X11Font(foundry => 'adobe', family => 'times', point => 120 ); $font = $widget->X11Font('*-courier-medium-r-normal-*-*'); DESCRIPTION
This module can be use to interrogate the X server what fonts are avaliable. METHODS
Foundry( [ $val ] ) Family( [ $val ] ) Weight( [ $val ] ) Slant( [ $val ] ) Swidth( [ $val ] ) Adstyle( [ $val ] ) Pixel( [ $val ] ) Point( [ $val ] ) Xres( [ $val ] ) Yres( [ $val ] ) Space( [ $val ] ) Avgwidth( [ $val ] ) Registry( [ $val ] ) Encoding( [ $val ] ) Set the given field in the font name to $val if given and return the current or previous value Name( [ $max ] ) In a list context it returns a list of all font names that match the fields given. It will return a maximum of $max names, or 128 if $max is not given. In a scalar contex it returns the first matching name or undef Clone( [ key => value, [ ...]] ) Create a duplicate of the curent font object and modify the given fields AUTHOR
Graham Barr <Graham.Barr@tiuk.ti.com> HISTORY
11-Jan-96 Initial version 08-Nov-98 Renamed for Tk800.012 COPYRIGHT
Copyright (c) 1995-1996 Graham Barr. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.14.2 2010-05-29 X11Font(3pm)
All times are GMT -4. The time now is 01:16 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy