Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: dynamic match thru awk
Top Forums UNIX for Advanced & Expert Users dynamic match thru awk Post 302132495 by lorcan on Friday 17th of August 2007 07:17:51 AM
Old 08-17-2007
Give a try,

Code:
#! /usr/bin/perl

$inpFile=$ARGV[0];
$searchStr=$ARGV[1];
open (INP,"<$inpFile") || die "Unable to open INPFILE::$inpFile\n";
while (<INP>) {
        $_ =~ s/\x0a|\x0d//g;
        @inpTag = split(/\|/,$_);
        foreach $value ( @inpTag ) {
                ($key,$val)  = (split ( /=/,$value ));
                if ( $key =~ /\b$searchStr\b/ ) {
                        print "$key= $val\n";
                }
        }
}
close (INP);

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Dynamic filename in awk

Hi The following code seems to work, but why am i getting an error message? cscyabl@comet:(develop)> awk 'BEGIN {FS="|"}{print $2 >> $1}' test.sum awk: A print or getline function must have a file name. The input line number is 8. The file is test.sum. The source line number is 1. ... (2 Replies)
Discussion started by: Indalecio
2 Replies

2. Shell Programming and Scripting

setting variable value to dynamic sed match - escaping hell

Hello All, I'm trying to write a script that will perform a dynamic match (of a dynamic variable) and set a variable to have the resulting (match) value. The idea is that the environment variable to check ($1) and the regular expression to use ($2) are given as parameters. For example,... (5 Replies)
Discussion started by: aedgar
5 Replies

3. Shell Programming and Scripting

Perl regular expression - To match a Dynamic URL

Hello All, I have a requirement to match a dynamic url and extract each of the directory and page and store it -Only PERL style Regular EXP as it will be used in informatica - REG_EXTRACT function Example Input URLs: 1)... (2 Replies)
Discussion started by: jambesh
2 Replies

4. Shell Programming and Scripting

how to make pattern search dynamic in awk

Hi, I have a data in a file like below - andy 22 abc 30000 wallstreet paul 30 xyz 40000 martstreet john 35 abc 50000 martstreet I want to search number of employees working in a particular company. Below query executes perfectly - awk '/abc/{ COUNT ++; }END { print "number of... (3 Replies)
Discussion started by: shell123
3 Replies

5. UNIX for Dummies Questions & Answers

awk display the match and 2 lines after the match is found.

Hello, can someone help me how to find a word and 2 lines after it and then send the output to another file. For example, here is myfile1.txt. I want to search for "Error" and 2 lines below it and send it to myfile2.txt I tried with grep -A but it's not supported on my system. I tried with awk,... (4 Replies)
Discussion started by: eurouno
4 Replies

6. Shell Programming and Scripting

Request: How to Parse dynamic SQL query to pad extra columns to match the fixed number of columns

Hello All, I have a requirement in which i will be given a sql query as input in a file with dynamic number of columns. For example some times i will get 5 columns, some times 8 columns etc up to 20 columns. So my requirement is to generate a output query which will have 20 columns all the... (7 Replies)
Discussion started by: vikas_trl
7 Replies

7. Shell Programming and Scripting

awk to match field between two files and use conditions on match

I am trying to look for $2 of file1 (skipping the header) in $2 of file2 (skipping the header) and if they match and the value in $10 is > 30 and $11 is > 49, then print the line from file1 to a output file. If no match is foung the line is not printed. Both the input and output are tab-delimited.... (3 Replies)
Discussion started by: cmccabe
3 Replies

8. Shell Programming and Scripting

awk to update file based on partial match in field1 and exact match in field2

I am trying to create a cronjob that will run on startup that will look at a list.txt file to see if there is a later version of a database using database.txt as the source. The matching lines are written to output. $1 in database.txt will be in list.txt as a partial match. $2 of database.txt... (2 Replies)
Discussion started by: cmccabe
2 Replies

9. Shell Programming and Scripting

awk to print match or non-match and select fields/patterns for non-matches

In the awk below I am trying to output those lines that Match between file1 and file2, those Missing in file1, and those missing in file2. Using each $1,$2,$4,$5 value as a key to match on, that is if those 4 fields are found in both files the match, but if those 4 fields are not found then missing... (0 Replies)
Discussion started by: cmccabe
0 Replies

10. UNIX for Advanced & Expert Users

Executing if dynamic conditions in awk

Hi All, I got struck at the below point where i am unable to get the desired output after forming the dynamic conditions.Below is the design. 1. We are getting inputs from the shell arguments and storing in a variable like below. CONDITIONS="1=CT,2=US_10,3=CT_US_10" 2. After this i am... (14 Replies)
Discussion started by: cskumar
14 Replies

LEARN ABOUT MOJAVE

extutils::command::mm

ExtUtils::Command::MM(3pm)				 Perl Programmers Reference Guide				ExtUtils::Command::MM(3pm)

NAME

       ExtUtils::Command::MM - Commands for the MM's to use in Makefiles

SYNOPSIS

	 perl "-MExtUtils::Command::MM" -e "function" "--" arguments...

DESCRIPTION

       FOR INTERNAL USE ONLY!  The interface is not stable.

       ExtUtils::Command::MM encapsulates code which would otherwise have to be done with large "one" liners.

       Any $(FOO) used in the examples are make variables, not Perl.

       test_harness
	     test_harness($verbose, @test_libs);

	   Runs the tests on @ARGV via Test::Harness passing through the $verbose flag.  Any @test_libs will be unshifted onto the test's @INC.

	   @test_libs are run in alphabetical order.

       pod2man
	     pod2man( '--option=value',
		      $podfile1 => $manpage1,
		      $podfile2 => $manpage2,
		      ...
		    );

	     # or args on @ARGV

	   pod2man() is a function performing most of the duties of the pod2man program.  Its arguments are exactly the same as pod2man as of
	   5.8.0 with the addition of:

	       --perm_rw   octal permission to set the resulting manpage to

	   And the removal of:

	       --verbose/-v
	       --help/-h

	   If no arguments are given to pod2man it will read from @ARGV.

	   If Pod::Man is unavailable, this function will warn and return undef.

       warn_if_old_packlist
	     perl "-MExtUtils::Command::MM" -e warn_if_old_packlist <somefile>

	   Displays a warning that an old packlist file was found.  Reads the filename from @ARGV.

       perllocal_install
	       perl "-MExtUtils::Command::MM" -e perllocal_install
		   <type> <module name> <key> <value> ...

	       # VMS only, key|value pairs come on STDIN
	       perl "-MExtUtils::Command::MM" -e perllocal_install
		   <type> <module name> < <key>|<value> ...

	   Prints a fragment of POD suitable for appending to perllocal.pod.  Arguments are read from @ARGV.

	   'type' is the type of what you're installing.  Usually 'Module'.

	   'module name' is simply the name of your module.  (Foo::Bar)

	   Key/value pairs are extra information about the module.  Fields include:

	       installed into	   which directory your module was out into
	       LINKTYPE 	   dynamic or static linking
	       VERSION		   module version number
	       EXE_FILES	   any executables installed in a space seperated
				   list

       uninstall
	       perl "-MExtUtils::Command::MM" -e uninstall <packlist>

	   A wrapper around ExtUtils::Install::uninstall().  Warns that uninstallation is deprecated and doesn't actually perform the
	   uninstallation.

perl v5.18.2							    2014-01-06						ExtUtils::Command::MM(3pm)
All times are GMT -4. The time now is 02:13 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy