Sponsored Content
Full Discussion: advanced awk
Top Forums Shell Programming and Scripting advanced awk Post 302409253 by wakatana on Wednesday 31st of March 2010 01:15:25 PM
Old 03-31-2010
advanced awk

Hi all

Input
Code:
group1	user1
	user2
	user3
group2	user4
	user5
	user1
group3	user6
	user7
	user8

Desired output
Code:
group1
group2

So far I've tried, but did not work
Code:
BEGIN
{
  i=0;                                  # declaring variable
}

{
  if (NF==2){currgrp=$1;}               # check whether awk actually processing 2 column record, if yes save the group name
  else
     {
      if ($1~/uname/)                   # else if awk is processing 1 column record and is found user name, save the group name to array and increment i
       {
         netgroups[i]=currgrp;
         i++;
       }
     }
}

END                                     # at the end of processing whole file print the array (all saved groups)
{
  for(j=0;j<i;j++)
  {
    print netgroups[i];
  }
}

skript was called
Code:
awk -v uname="user1" -f awkscript.awk group_file

what is wrong with script above ?
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Advanced Getopts

Hi all, I am using getops to get the arguments passed by the command line. However, I need to specify some rules regarding the parameter sent. For eg: I have script called MyScript which accept parameter d, I, E, r, u so the usage should be like this: MyScript So far, I finished... (2 Replies)
Discussion started by: stefan_hery
2 Replies

2. UNIX for Dummies Questions & Answers

Advanced LS?

My goal is simply to output a listing of all files in a directory and all subdirectories, one per line, ****with their full path****. The *** part is what I can't figure out. I can get one on a line and I like having the extra info, so I'm using ls -Rl right now. But what I get is just the... (2 Replies)
Discussion started by: bostonrobot
2 Replies

3. UNIX for Advanced & Expert Users

Advanced I/O

What is Stream Devices and Stream pipes? Explain Advanced I/O ? (1 Reply)
Discussion started by: thangappan
1 Replies

4. Shell Programming and Scripting

Advanced printf

I want to print: WELCOME TO MY WORLD Where "WELCOME TO MY WORLD" will be in green (32) and the underline will be in yellow (33). How can i do the above using printf. printf "`tput smul`\033 leaves both the text and the underline in green. (3 Replies)
Discussion started by: proactiveaditya
3 Replies

5. Programming

Books for advanced C

Simple question , what good book is next step in learning C. I finished with K&R and I want to go to the next step , so if someone has a good book please share title :D I looked for Advanced C programming by example but it is too expansive 400$ on Amazon :( So please tell me (7 Replies)
Discussion started by: solaris_user
7 Replies

6. UNIX for Advanced & Expert Users

Help with advanced wget

Hi All, I am trying to download large no of data using wget. the URLS are saved in a file. I want to want for a few seconds after every URL is downloaded so i saw the option -w with wget but it does not seem to work. Can any one give me a working usage. wget -i ../file1t -o ../Outlog.log -N -S... (2 Replies)
Discussion started by: johnasvini
2 Replies

7. Shell Programming and Scripting

Advanced sed/awk help

I have thousands of files in HTML that looks like this: .... .... .... <!-- table horaire --> <!-- table horaire --> <table border="0" cellspacing="0" cellpadding="0" class="tblHoraires" summary="Table des horaires de la ligne 12"> <tr> <th scope="row"... (13 Replies)
Discussion started by: charafantah
13 Replies

8. UNIX for Dummies Questions & Answers

Help with awk (making simple/advanced ini parser)

Hello I'm searching some kind of example (or ready-made solution, but I don't really want it, because I want to learn awk more), to make something like a parser in awk for something like this (I put example, because I don't really know how to explain this): line1=1 line2=0 line3=1... (23 Replies)
Discussion started by: jormung
23 Replies

9. Shell Programming and Scripting

Advanced AWK Regexp substring to int & Replace

Hi! I have a difficult problem, to step up a unknown version number in a text file, and save the file. It would be great to run script.sh and the version gets increased. Example the content of the textfile.txt hello version = x bye This include three steps 1. First find the char after... (2 Replies)
Discussion started by: Beachboy72
2 Replies

10. Shell Programming and Scripting

EXPECT - advanced help

Hi, i need to automate installation (console) of product and found except as solution.iam new to expect and know basics of expect. i am struck with the following cases and need help for them to continue: 1) in every screen of installation at the end we have kind of buttons which we need to... (7 Replies)
Discussion started by: sai Harika
7 Replies
Apache::Htgroup(3pm)					User Contributed Perl Documentation				      Apache::Htgroup(3pm)

NAME
Apache::Htgroup - Manage Apache authentication group files SYNOPSIS
use Apache::Htgroup; $htgroup = Apache::Htgroup->load($path_to_groupfile); &do_something if $htgroup->ismember($user, $group); $htgroup->adduser($user, $group); $htgroup->deleteuser($user, $group); $htgroup->deletegroup( $group ); $htgroup->save; DESCRIPTION
Manage Apache htgroup files Please note that this is not a mod_perl module. Please also note that there is another module that does similar things (HTTPD::UserManage) and that this is a more simplistic module, not doing all the things that one does. METHODS The following methods are provided by this module. load $htgroup = Apache::Htgroup->load($path_to_groupfile); Returns an Apache::Htgroup object. new $htgroup = Apache::Htgroup->new(); $htgroup = Apache::Htgroup->new( $path_to_groupfile ); Creates a new, empty group file. If the specified file already exists, loads the contents of that file. If no filename is specified, you can create a group file in memory, and save it later. adduser $htgroup->adduser( $username, $group ); Adds the specified user to the specified group. deleteuser $htgroup->deleteuser($user, $group); Removes the specified user from the group. groups $groups = $htgroup->groups; Returns a (reference to a) hash of the groups. The key is the name of the group. Each value is a hashref, the keys of which are the group members. I suppose there may be some variety of members method in the future, if anyone thinks that would be useful. It is expected that this method will not be called directly, and it is provided as a convenience only. Please see the section below about internals for an example of the data structure. reload $self->reload; If you have not already called save(), you can call reload() and get back to the state of the object as it was loaded from the original file. deletegroup $self->deletegroup( 'GroupName' ); Removes a group from the htgroup file. You will need to call save afterward to commit this change back to the file. save $htgroup->save; $htgroup->save($file); Writes the current contents of the htgroup object back to the file. If you provide a $file argument, "save" will attempt to write to that location. ismember $foo = $htgroup->ismember($user, $group); Returns true if the username is in the group, false otherwise Internals Although this was not the case in earlier versions, the internal data structure of the object looks something like the following: $obj = { groupfile => '/path/to/groupfile', groups => { group1 => { 'user1' => 1, 'user2' => 1, 'user3' => 1 }, group2 => { 'usera' => 1, 'userb' => 1, 'userc' => 1 }, } }; Note that this data structure is subject to change in the future, and is provided mostly so that I can remember what the heck I was thinking when I next have to look at this code. Adding groups A number of folks have asked for a method to add a new group. This is unnecessary. To add a new group, just start adding users to a new group, and the new group will magically spring into existance. AUTHOR
Rich Bowen, rbowen@rcbowen.com COPYRIGHT
Copyright (c) 2001 Rich Bowen. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module. perl v5.10.1 2010-12-01 Apache::Htgroup(3pm)
All times are GMT -4. The time now is 02:25 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy