Replace substring by longest string in common field (awk) Post: 303042962

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Finding longest common substring among filenames

I will be performing a task on several directories, each containing a large number of files (2500+) that follow a regular naming convention: YYYY_MM_DD_XX.foo_bar.A.B.some_different_stuff.EXT What I would like to do is automatically discover the part of the filenames that are common to all...

2. 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...

3. Shell Programming and Scripting

Awk Search text string in field, not all in field.

Hello, I am using awk to match text in a tab separated field and am able to do so when matching the exact word. My problem is that I would like to match any sequence of text in the tab-separated field without having to match it all. Any help will be appreciated. Please see the code below. awk...

4. Shell Programming and Scripting

sed or awk command to replace a string pattern with another string based on position of this string

here is what i want to achieve... consider a file contains below contents. the file size is large about 60mb cat dump.sql INSERT INTO `table1` (`id`, `action`, `date`, `descrip`, `lastModified`) VALUES (1,'Change','2011-05-05 00:00:00','Account Updated','2012-02-10...

5. Shell Programming and Scripting

awk uniq and longest string of a column as index

I met a challenge to filter ~70 millions of sequence rows and I want using awk with conditions: 1) longest string of each pattern in column 2, ignore any sub-string, as the index; 2) all the unique patterns after 1); 3) print the whole row; input: 1 ABCDEFGHI longest_sequence1 2 ABCDEFGH...

6. UNIX for Dummies Questions & Answers

Values with common field in same line with awk

Hi all ! I almost did it but got a small problem. input: cars red cars blue cars green truck black Wanted: cars red-blue-green truck black Attempt: gawk 'BEGIN{FS="\t"}{a = a (a?"-":"")$2; $2=a; print $1 FS $2}' input But I also got the intermediate records...

7. Shell Programming and Scripting

Parsing the longest match substring

Hello gurus, I have a database of possible primary signal strings pp22 pt22dx pp22dx jty2234 Also I have a list of scrambled signals which has a shorter string and a longer string separated by // (double slash ). Always the shorter string of a scrambled signal will have the primary...

8. Shell Programming and Scripting

awk to update field using matching value in file1 and substring in field in file2

In the awk below I am trying to set/update the value of $14 in file2 in bold, using the matching NM_ in $12 or $9 in file2 with the NM_ in $2 of file1. The lengths of $9 and $12 can be variable but what is consistent is the start pattern will always be NM_ and the end pattern is always ;...

9. UNIX for Beginners Questions & Answers

Awk: output lines with common field to separate files

Hi, A beginner one. my input.tab (tab-separated): h1 h2 h3 h4 h5 item1 grpA 2 3 customer1 item2 grpB 4 6 customer1 item3 grpA 5 9 customer1 item4 grpA 0 0 customer2 item5 grpA 9 1 customer2 objective: output a file for each customer ($5) with the item number ($1) only if $2 matches...

10. Shell Programming and Scripting

Replace substring from a string variable

Hi, Wish to remove "DR-" from the string variable (var). var="DR-SERVER1" var=`echo $var | sed -e 's/DR-//g'` echo "$var" Expected Output: However, I get the below error: Can you please suggest.

LEARN ABOUT MOJAVE

modperl::global

install::TempContent::Objects::mod_perl-2.0.9::docs::apiUserdContributinstall::TempContent::Objects::mod_perl-2.0.9::docs::api::ModPerl::Global(3)

NAME

       ModPerl::Global -- Perl API for manipulating special Perl lists

Synopsis
	 use ModPerl::Global ();
	 my $package = 'MyApache2::Package';

	 # make the END blocks of this package special
	 ModPerl::Global::special_list_register(END => $package);

	 # Execute all encoutered END blocks from this package now
	 ModPerl::Global::special_list_call(	END => $package);

	 # delete the list of END blocks
	 ModPerl::Global::special_list_clear(	END => $package);

Description
       "ModPerl::Global" provides an API to manipulate special perl lists. At the moment only the "END" blocks list is supported.

       This API allows you to change the normal Perl behavior, and execute special lists when you need to.

       For example "ModPerl::RegistryCooker" uses it to run "END" blocks in the scripts at the end of each request.

       Before loading a module containing package $package, you need to register it, so the special blocks will be intercepted by mod_perl and not
       given to Perl. "special_list_register" does that. Later on when you want to execute the special blocks, "special_list_call" should be
       called. Unless you want to call the list more than once, clear the list with "special_list_clear".

API

       "ModPerl::Global" provides the following methods:

   "special_list_call"
       Call the special list

	 $ok = special_list_call($key => $package);

       arg1: $key ( string )
	   The name of the special list. At the moment only 'END' is supported.

       arg2: $package ( string )
	   what package to special list is for

       ret: $ok ( boolean )
	   true value if $key is known, false otherwise.

       since: 2.0.00

   "special_list_clear"
       Clear the special list

	 $ok = special_list_clear($key => $package);

       arg1: $key ( string )
	   The name of the special list. At the moment only 'END' is supported.

       arg2: $package ( string )
	   what package to special list is for

       ret: $ok ( boolean )
	   true value if $key is known, false otherwise.

       since: 2.0.00

   "special_list_register"
       Register the special list

	 $ok = special_list_call($key => $package);

       arg1: $key ( string )
	   The name of the special list. At the moment only 'END' is supported.

       arg2: $package ( string )
	   what package to special list is for

       ret: $ok ( boolean )
	   true value if $key is known, false otherwise.

       since: 2.0.00

       Notice that you need to register the package before it is loaded. If you register it after, Perl has already compiled the "END" blocks and
       there are no longer under your control.

See Also
       mod_perl 2.0 documentation.

Copyright
       mod_perl 2.0 and its core modules are copyrighted under The Apache Software License, Version 2.0.

Authors
       The mod_perl development team and numerous contributors.

perl v5.18.2							    20install::TempContent::Objects::mod_perl-2.0.9::docs::api::ModPerl::Global(3)