Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: simplify the script, check field match to value in a file
Top Forums Shell Programming and Scripting simplify the script, check field match to value in a file Post 302424336 by jimmy_y on Tuesday 25th of May 2010 03:33:48 AM
Old 05-25-2010
Quote:
Originally Posted by pludi
Ah, I thought you were looking for a 1-liner. Complete, stand-alone script:
Code:
#!/usr/bin/perl

use strict;
use warnings;
use Carp;

open my $FH, '<', '1.txt' or croak "Can't open 1.txt: $!";
print grep { local @_ = split; $_[1] =~ /a|cc/ } <$FH>;
close $FH;

Thanks.

by the way
Code:
#!/usr/bin/perl
use strict;
use warnings;

is the same as:
Code:
#!/usr/bin/perl -w
use strict;

(and why today i cannot see reward point icon anymore? to thanks those answers)
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Script to Match first field of two Files and print

Hi, I want to get script or command in Sun Unix which matches first fields of both the files and print the feilds of one files, example may make it more clear. InputFile1 ================== Alex,1,fgh Menthos,45454,toto Gothica,855,ee Zenie4,77,gg Salvatore,66,oo Dhin,1234,papapa... (3 Replies)
Discussion started by: indian.ace
3 Replies

2. Shell Programming and Scripting

AWK: Pattern match between 2 files, then compare a field in file1 as > or < field in file2

First, thanks for the help in previous posts... couldn't have gotten where I am now without it! So here is what I have, I use AWK to match $1 and $2 as 1 string in file1 to $1 and $2 as 1 string in file2. Now I'm wondering if I can extend this AWK command to incorporate the following: If $1... (4 Replies)
Discussion started by: right_coaster
4 Replies

3. UNIX for Dummies Questions & Answers

Help with AWK - Compare a field in a file to lookup file and substitute if only a match

I have the below 2 files: 1) Third field from file1.txt should be compared to the first field of lookup.txt. 2) If match found then third field, file1.txt should be substituted with the second field from lookup.txt. 3)Else just print the line from file1.txt. File1.txt:... (4 Replies)
Discussion started by: venalla_shine
4 Replies

4. Shell Programming and Scripting

Command/script to match a field and print the next field of each line in a file.

Hello, I have a text file in the below format: Source Destination State Lag Status CQA02W2K12pl:D:\CAQA ... (10 Replies)
Discussion started by: pocodot
10 Replies

5. Shell Programming and Scripting

awk to update field file based on match

If $1 in file1 matches $2 in file2. Then the value in $2 of file2 is updated to $1"."$2 of file2. The awk seems to only match the two files but not update. Thank you :). awk awk 'NR==FNR{A ; next} $1 in A { $2 = a }1' file1 file2 file1 name version NM_000593 5 NM_001257406... (3 Replies)
Discussion started by: cmccabe
3 Replies

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

7. Shell Programming and Scripting

awk to update field in file based of match in another

I am trying to use awk to match two files that are tab-delimited. When a match is found between file1 $1 and file2 $4, $4 in file2 is updated using the $2 value in file1. If no match is found then the next line is processed. Thank you :). file1 uc001bwr.3 ADC uc001bws.3 ADC... (4 Replies)
Discussion started by: cmccabe
4 Replies

8. Shell Programming and Scripting

Get output of multiple pattern match from first field to a file

Hi All, Greetings! I have a file of 40000+ lines with different entries, I need matching entries filterd out to their files based on first filed pattern for the matching : For example: All server1 entries (in field1) to come together with its path in 2nd field. The best output I want... (9 Replies)
Discussion started by: rveri
9 Replies

9. Shell Programming and Scripting

Perl to update field in file based of match to another file

In the perl below I am trying to set/update the value of $14 (last field) in file2, 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 ;... (4 Replies)
Discussion started by: cmccabe
4 Replies

10. Shell Programming and Scripting

Script to check field value from a file records

I need a script to check the records in a file , if any value match transfer the record in error.txt file. 1- If any of the any field value is NULL(nothing in this field) Record1|Record2|Record3|Record4|Record5|DATE1|DATE2 Example: 11111111|22222222|NULL|12|444|27042018|27042018... (8 Replies)
Discussion started by: vivekn
8 Replies

LEARN ABOUT DEBIAN

carp::datum::makemaker

Datum::MakeMaker(3pm)					User Contributed Perl Documentation				     Datum::MakeMaker(3pm)

NAME

       Carp::Datum::MakeMaker - Offer to strip Carp::Datum calls statically

SYNOPSIS

	# Put this at the top of the Makefile.PL for your module
	use ExtUtils::MakeMaker;       # you may omit this line
	use Carp::Datum::MakeMaker;

DESCRIPTION

       The "Carp::Datum::MakeMaker" module supersedes the regular WriteMakefile() routine of "ExtUtils::MakeMaker".

       When running the Makefile.PL from a module interactively, the user will be asked whether calls to "Carp::Datum" should be stripped at build
       time.

       By default, or when running non-interactively, most calls to Carp::Datum routines will be removed: the "datum_strip" program will be
       invoked to filter *.pm files during the build process.  This program is a mere wrapper for the datum_strip() routine, defined in
       "Carp::Datum::Strip".

       The only call that will not be stripped is the DTRACE() call.  However, it will be dynamically remapped to a "Log::Agent" call.	It cannot
       be statically remapped because of its baroque interface.

       At the top of Makefile.PL, insert

	   use Carp::Datum::MakeMaker;

       which will take care of loading "ExtUtils::MakeMaker".  Note that it makes sense to refer to this module, since "Carp::Datum" is being used
       internally, and therefore the user will not be able to install the module if they do not have "Carp::Datum" already installed.

       If you wish to be nicer about "Carp::Datum" not being installed, you can say instead:

	   use ExtUtils::MakeMaker;
	   eval "use Carp::Datum::MakeMaker;";

	   WriteMakefile(
	       'NAME'	   => "Your::module::name",
	       'PREREQ_PM' => {
		   'Carp::Datum'  => '0.100',
	       },
	   );

       It will allow them to run the Makefile.PL, and yet be reminded about the missing "Carp::Datum" module.  Chances are they won't be able to
       go much farther though...

AUTHORS

       Christophe Dehaudt and Raphael Manfredi are the original authors.

       Send bug reports, hints, tips, suggestions to Dave Hoover at <squirrel@cpan.org>.

SEE ALSO

       Carp::Datum::Strip(3), ExtUtils::MakeMaker(3).

perl v5.10.0							    2006-04-13						     Datum::MakeMaker(3pm)
All times are GMT -4. The time now is 09:11 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy