Replacing stopwords based on a list Post: 302939652

Sponsored Content

Top Forums UNIX for Dummies Questions & Answers Replacing stopwords based on a list Post 302939652 by drl on Friday 27th of March 2015 11:30:02 AM

03-27-2015

Registered User

Hi.

Here is an alternate solution with perl. The stop words are in a list, one pair to a line, separated by TAB. There is a "general string" which is supplied if no replacement string is specified. This driver script lists the data file, the replacements file, the perl code, and the results:

Code:

#!/usr/bin/env bash

# @(#) s2	Demonstrate easy replacement with perl.

# Utility functions: print-as-echo, print-line-with-visual-space, debug.
# export PATH="/usr/local/bin:/usr/bin:/bin"
LC_ALL=C ; LANG=C ; export LC_ALL LANG
pe() { for _i;do printf "%s" "$_i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
db() { ( printf " db, ";for _i;do printf "%s" "$_i";done;printf "\n" ) >&2 ; }
db() { : ; }
C=$HOME/bin/context && [ -f $C ] && . $C perl

FILE=${1-data1}

pl " perl code:"
cat p2

pl " Input data file $FILE:"
cat $FILE

pl " Replacement pairs, old TAB new, unpaired get \"general string\":"
cat replacements.txt

pl " Results:"
./p2 $FILE

exit 0

producing:

Code:

$ ./s2

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian 5.0.8 (lenny, workstation) 
bash GNU bash 3.2.39
perl 5.10.0

-----
 perl code:
#!/usr/bin/env perl

# @(#) p2	Demonstrate replacement from hashed pairs.

use strict;
use warnings;
use Carp;

my ($f);
my $rf = "replacements.txt";
my $gs;    # general string, used if no replacement found.
$gs = "...";

# Read pairs into hash.
my (%hp);
open( $f, "<", $rf ) || croak "cannot open pairs file \"$rf\"";
my ( $t1, $t2 );
while (<$f>) {
  chomp;
  ( $t1, $t2 ) = split( /\s+/, $_, 2 );
  $hp{$t1} = defined($t2) ? $t2 : $gs;
}
close $f;

# Print hash if debugging needed.
# foreach $t1 ( keys %hp ) { print "$t1 => $hp{$t1}\n" };

# Read and replace.
while (<>) {
  foreach $t1 ( keys %hp ) {
    s/$t1/$hp{$t1}/gi;
  }
  print;
}

-----
 Input data file data1:
Now is the time
for all good men
to come to the aid
of their country.
aa aa cc bb cc bb aa AA Aa aA aa

-----
 Replacement pairs, old TAB new, unpaired get "general string":
Now	Then
is	was
good	manly
their	< yours, mine, ours >
aid	bandage
to
aa	xx
bb	yy
cc	zz

-----
 Results:
Then was the time
for all manly men
... come ... the bandage
of < yours, mine, ours > country.
xx xx zz yy zz yy xx xx xx xx xx

If one is interested, there is a perl module https://metacpan.org/release/String-Replace which may be a bit faster (claimed in the object-oriented mode), but I do not think that it allows case insensitivity.

Best wishes ... cheers, drl

drl

View Public Profile for drl

Find all posts by drl

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Replacing text based on replacement tables

Dear all, will be grateful for your advices.. The need is (i guess) simple for UNIX experts. Basically, there are replacement tables, which would be used to replace text strings in the data (large volumes..). An exmpl table (a "config file"): VIFIS1_1_PE1836 VIBRIO_FISCHERI VIPAR1_1_PE1662 ...

2. Shell Programming and Scripting

Replacing Character in a file based on element

Hi, I have file like below. Unix:/pclls/turc>cat tibc.property executeReceiver=Y executeSender=Y I want to replace executeSender=N in the file. My file should be like below. executeReceiver=Y executeSender=N I tried with the below command, its giving error. cat tibc.property |...

3. UNIX for Dummies Questions & Answers

Script for replacing text in a file based on list

Hi All, I am fairly new to the world of Unix, and I am looking for a way to replace a line of text in a file with a delimited array of values. I have an aliases file that is currently in use on our mail server that we are migrating off of. Until the migration is complete, the server must stay...

4. Shell Programming and Scripting

Replacing headers based on a second file

I have a file with thousands of sequences that looks like this: I need to replace the headers using a second file Thus, I will end up having the following file: I am looking for an AWK script that I can easily plug in my current pipeline. Any help will be greatly appreciated!

5. Shell Programming and Scripting

Replacing the text in a row based on certain condition

Hi All, I felt tough to frame my question. Any way find my below input. (.CSV file) SNo, City 1, Chennai 2, None 3, Delhi 4,None Note that I have many rows ans also other columns beside my City column. What I need is the below output. SNo, City 1, Chennai 2, Chennai_new 3, Delhi...

6. Shell Programming and Scripting

Finding/replacing strings in some files based on a file

Hi, We have a file (e.g. a .csv file, but could be any other format), with 2 columns: the old value and the new value. We need to modify all the files within the current directory (including subdirectories), so find and replace the contents found in the first column within the file, with the...

7. Shell Programming and Scripting

Help with awk replacing identical columns based on another file

Hello, I am using Awk in UBUNTU 12.04. I have a file like following with three fields and 44706 rows. F1 A A F2 G G F3 A T I have another file like this: AL_1 F1 A A AL_2 F1 A T AL_3 F1 A A AL_1 F2 G G AL_2 F2 G A AL_3 F2 G G BO_1 F1 A A BO_2 F1 A T...

8. Shell Programming and Scripting

Replacing a character with a number based on lines

Hi, I am in need of help for the two things which is to be done. First, I have a file that has around four columns. The first column is filled with letter "A". There are around 400 lines in the files as shown below. A 1 5.2 3.2 A 2 0.2 4.5 A 1 2.2 2.2 A 5 2.1 ...

9. UNIX for Advanced & Expert Users

Replacing string length based on pattern

Hi All, I have a file which is like below. I need to read all the patterns that starts with P and then replace the 9 digit values to 8 digit values (remove leading integer). Can you please help Example : ( Please look below File) File : P,1 M1,...

10. UNIX for Beginners Questions & Answers

Replacing tag based on condition

Hi All, I am having a file like below. The file will having information about the records.If you see the file the file is header and data. For example it have 1 men tag and the tag id will be come after headers. The change is I want to convert All pets tag from P to X. I did a sed like below...

LEARN ABOUT CENTOS

create_text_search_dictionary

CREATE TEXT SEARCH 
DICTIONARY(7)			  PostgreSQL 9.2.7 Documentation			  CREATE TEXT SEARCH DICTIONARY(7)

NAME

       CREATE_TEXT_SEARCH_DICTIONARY - define a new text search dictionary

SYNOPSIS

       CREATE TEXT SEARCH DICTIONARY name (
	   TEMPLATE = template
	   [, option = value [, ... ]]
       )

DESCRIPTION

       CREATE TEXT SEARCH DICTIONARY creates a new text search dictionary. A text search dictionary specifies a way of recognizing interesting or
       uninteresting words for searching. A dictionary depends on a text search template, which specifies the functions that actually perform the
       work. Typically the dictionary provides some options that control the detailed behavior of the template's functions.

       If a schema name is given then the text search dictionary is created in the specified schema. Otherwise it is created in the current
       schema.

       The user who defines a text search dictionary becomes its owner.

       Refer to Chapter 12, Full Text Search, in the documentation for further information.

PARAMETERS

       name
	   The name of the text search dictionary to be created. The name can be schema-qualified.

       template
	   The name of the text search template that will define the basic behavior of this dictionary.

       option
	   The name of a template-specific option to be set for this dictionary.

       value
	   The value to use for a template-specific option. If the value is not a simple identifier or number, it must be quoted (but you can
	   always quote it, if you wish).

       The options can appear in any order.

EXAMPLES

       The following example command creates a Snowball-based dictionary with a nonstandard list of stop words.

	   CREATE TEXT SEARCH DICTIONARY my_russian (
	       template = snowball,
	       language = russian,
	       stopwords = myrussian
	   );

COMPATIBILITY

       There is no CREATE TEXT SEARCH DICTIONARY statement in the SQL standard.

SEE ALSO

       ALTER TEXT SEARCH DICTIONARY (ALTER_TEXT_SEARCH_DICTIONARY(7)), DROP TEXT SEARCH DICTIONARY (DROP_TEXT_SEARCH_DICTIONARY(7))

PostgreSQL 9.2.7						    2014-02-17					  CREATE TEXT SEARCH DICTIONARY(7)