Sponsored Content
Top Forums Shell Programming and Scripting search more than one pattern with perl on same line Post 302495839 by fpmurphy on Friday 11th of February 2011 10:31:43 AM
Old 02-11-2011
Here is one way of doing it
Code:
$ cat infile.txt
123 abc defDOERAEMEaea
fsfsfsf sdsdfsa

$ cat example.pl
#!/usr/local/bin/perl

use strict;
use warnings;

my $file  = "infile.txt";
my $pattern1 = "123";
my $pattern2 = "abc";
my $pattern3 = "DOERAEME";

open (IN, "< $file") || die "ERROR: opening $file\n";

while (<IN>)
{
    if (/$pattern1/ && /$pattern2/ && /$pattern3/) {
       print "found all patterns\n";
    }
    if (/$pattern1/ || /$pattern2/ || /$pattern3/) {
       print "found one or more patterns\n";
    }
}

close IN;

$ ./example
found all patterns
found one or more patterns
$

This User Gave Thanks to fpmurphy For This Post:
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl: Search for string on line then search and replace text

Hi All, I have a file that I need to be able to find a pattern match on a line, search that line for a text pattern, and replace that text. An example of 4 lines in my file is: 1. MatchText_randomNumberOfText moreData ReplaceMe moreData 2. MatchText_randomNumberOfText moreData moreData... (4 Replies)
Discussion started by: Crypto
4 Replies

2. Shell Programming and Scripting

Perl onliner to search the last line with an occurence of a pattern

Hi I need a perl onliner which seaches a line starting with a pattern(last occurence) and display it. similar to grep 'pattern' filename | tail -1 in UNIX Ex: I want to display the line starting with "cool" and which is a last occurence adadfadafadf adfadadf cool dfadfadfadfara... (4 Replies)
Discussion started by: ammu
4 Replies

3. Shell Programming and Scripting

Perl Search pattern error

Hi, I am trying to grep for two patterns from a set of 820 apache webserver logs, When I Try to search the pattern with a date stamp and use a wildcard character * for ex: /28/Aug/2008:21*/ to get all the log entries for that particular hour that is 21 st hour I get errors. Please kindly... (1 Reply)
Discussion started by: openspark
1 Replies

4. UNIX for Dummies Questions & Answers

modify a particular pattern starting from second line of the search pattern

Hi, I am new to this forum and i would like to get help in this issue. I have a file 1.txt as shown: apple banana orange apple grapes banana orange grapes orange .... Now i would like to search for pattern say apple or orange and then put a # at the beginning of the pattern... (2 Replies)
Discussion started by: imas
2 Replies

5. UNIX for Dummies Questions & Answers

modify a particular pattern starting from second line of the search pattern

Hi, I think you ppl did not get my question correctly, let me explain I have 1.txt with following entries as shown: 0152364|134444|10.20.30.40|015236433 0233654|122555|10.20.30.50|023365433 ** ** ** In file 2.txt I have the following entries as shown: ... (1 Reply)
Discussion started by: imas
1 Replies

6. Shell Programming and Scripting

perl:: search for tow pattern and replace the third pattern

Hi i want to search two pattern on same line and replace onther pattern.. INPut file aaaa bbbbb nnnnnn ttttt cccc bbbbb nnnnnn ppppp dddd ccccc nnnnnn ttttt ffff bbbbb oooooo ttttt now i want replace this matrix like.. i want search for "bbbbb","nnnnnn" and search and replace for... (4 Replies)
Discussion started by: nitindreamz
4 Replies

7. Shell Programming and Scripting

perl pattern search

can someone help me out with the bolded? else if (regmatch($Subject, "^Application") && (regmatch($From, "^etgh") && (regmatch($Body, ".*not authorized to use this server.*")))) what this section of the code is suppose to do is to scan through the contents of $Body, if do a set of... (1 Reply)
Discussion started by: SkySmart
1 Replies

8. Shell Programming and Scripting

perl search and replace - search in first line and replance in 2nd line

Dear All, i want to search particular string and want to replance next line value. following is the test file. search string is tmp,??? ,10:1 "???" may contain any 3 character it should remain the same and next line replace with ,10:50 tmp,123 --- if match tmp,??? then... (3 Replies)
Discussion started by: arvindng
3 Replies

9. Shell Programming and Scripting

How to search pattern and add that pattern in next line

Hi All, I am new to shell scripting and need help in scripting using CSH. Here is what I am trying to so, 1. Search a specific string e.g. "task" from "task (input1, out1)". 2. Extract the arguements "input1" and "out1" 3. Add them in separate lines below. eg. "int input1" , " integer out1" ... (7 Replies)
Discussion started by: deshiashish
7 Replies

10. Shell Programming and Scripting

Search a pattern in a line and remove another pattern

Hi, I want to search a pattern in a text file and remove another pattern in that file. my text file look like this 0.000000 1.970000 F 303 - 1.970000 2.080000 VH VH + 2.080000 2.250000 VH VH + 2.250000 2.330000 VH L - 2.330000 2.360000 F H + 2.360000 2.410000 L VL - 2.410000 ... (6 Replies)
Discussion started by: sreejithalokkan
6 Replies
UNIUNMASK(1)						      General Commands Manual						      UNIUNMASK(1)

NAME
uniunmask - XOR bits or substitute glyphs in a GNU Unifont file. SYNOPSIS
uniunmask [-iinput_file] [-ooutput_file] DESCRIPTION
uniunmask reads a GNU Unifont .hex file. As it reads the font file, it scans for code points matching entries in the "masks.hex" and "sub- stitutes.hex" files. "masks.hex" and "substitutes.hex" are also in GNU Unifont .hex format, ordered by Unicode code point (the hexadecimal number to the left of the colon on each line). If a code point is encountered from "substitutes.hex", the input code point in the original .hex file is ignored (as is any entry with the same code point in "masks.hex") and the glyph from "substitutes.hex" is written to the output file. Otherwise, if a code point is encountered from "masks.hex", the input glyph in the original .hex file is XORed with the bits in the "masks.hex" entry. The result of this XOR operation is written to the output file. OPTIONS
-i Specify the input file. The default is stdin. -o Specify the output file. The default is stdout. FILES
masks.hex, substitutes.hex, *.hex GNU Unifont font files SEE ALSO
bdfimplode(1), hex2bdf(1), hex2bdf-split(1), hex2sfd(1), hexbraille(1), hexdraw(1), hexmerge(1), johab2ucs2(1), unibmp2hex(1), unicover- age(1), unidup(1), unihex2bmp(1), unipagecount(1) AUTHOR
uniunmask was written by Paul Hardy. LICENSE
uniunmask is Copyright (C) 2007 Paul Hardy, and is released under version 2 of the GNU General Public License, or (at your option) a later version. BUGS
No known real bugs exist, except that this software does not perform extensive error checking on its input files. If they're not in the format of the original GNU Unifont hex file, all bets are off. 2008 Jul 6 UNIUNMASK(1)
All times are GMT -4. The time now is 03:28 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy