Sponsored Content
Full Discussion: Perl file comparison
Top Forums Shell Programming and Scripting Perl file comparison Post 302419591 by pseudocoder on Friday 7th of May 2010 02:42:55 PM
Old 05-07-2010
Code:
#!/usr/bin/perl

my $ainput = 'FileA' ;
my $binput = 'FileB' ;
my $boutput = 'OutputFileB' ;
my @temparr = () ;
my @mainarr = () ;

open(A,$ainput) or die "Error: $!\n" ;
open(B,$binput) or die "Error: $!\n" ;

my @aarr = <A> ;
my @barr = <B> ;

close(A) ;
close(B) ;

  foreach my $record (@aarr) {
  chomp $record ;
  my $sub = substr($record,0,18) ;
  @temparr = grep(/$sub/,@barr) ;
  push(@mainarr,@temparr) ;  }

open(BO,">$boutput") or die "Error: $!\n" ;
print BO @mainarr ;
close(BO) ;

 

10 More Discussions You Might Find Interesting

1. UNIX for Advanced & Expert Users

perl: string comparison as numbers

$name = 'Mark'; $goodguy = 'Tody'; if ($name == $goodguy) { print "Hello, Sir.\n"; } else { print "Begone, evil peon!\n"; } The output is Hello, Sir...... Even if the Mark is made to MarkSpencer.....then also it shows as Hello, Sir.... Can any one explain the... (7 Replies)
Discussion started by: bishweshwar
7 Replies

2. Shell Programming and Scripting

file comparison

hi I have 2 files to comapre ,in file a sible column it is numbers,in file b2 numbers and other values with coma separated. i want compare numbers in file a with file b,and the out put put should be in C with numbers in both file a and b along with other columns of file b. i used folowing... (7 Replies)
Discussion started by: satish.res
7 Replies

3. Shell Programming and Scripting

File Comparison- Need help

I have two text files which have records of thousand rows. Each row is having around 40 columns. Each column is tab delimited. Each row is delimited by newline character. My requirement is to find for each row i need to find whether any column is different between the two files. For each row i... (8 Replies)
Discussion started by: uihnybgte
8 Replies

4. Shell Programming and Scripting

Comparison of two files which contains strings using Shell scripting or PERL

Hi, I need sample code to compare the two files line by line which contains text strings and to print the difference in the third file. Thanks in advance (1 Reply)
Discussion started by: sudhakaryadav
1 Replies

5. Shell Programming and Scripting

Comparison of command line argument in perl

Hello All, I have passed one command line argument in my script. I want to compare that value in the script itself. Is there any way to compare the command line variable....... (3 Replies)
Discussion started by: suvenduperl
3 Replies

6. Shell Programming and Scripting

two file comparison

now i have a different file zoo.txt with content 123|zoo 234|natan 456|don and file rick.txt with contents 123|dog|pie|pep 123|tail|see|newt 456|som|sin|sim 234|pay|rat|cat i want to look for lines in file zoo.txt column1 that has same corresponding lines in column 1 of... (6 Replies)
Discussion started by: dealerso
6 Replies

7. Shell Programming and Scripting

file comparison

Dear All, I would really appreciate if you can help me to resolve this file comparison I have two files: file1: chr start end ID gene_name chr1 2020 3030 1 test1 chr1 900 5000 2 test1 chr2 5000 8000 3 test2 chr3 6000 12000 4 test3 chr3 6000 15000 5 test3 file2:... (2 Replies)
Discussion started by: paolo.kunder
2 Replies

8. Shell Programming and Scripting

File Comparison: Print Lines not present in another file

Hi, I have fileA.txt like this. B01B02 D0011718 B01B03 D0012540 B01B04 D0006145 B01B05 D0004815 B01B06 D0012069 B01B07 D0004064 B01B08 D0011988 B01B09 D0012071 B01B10 D0005596 B01B11 D0011351 B01B12 D0004814 B01C01 D0011804 I want to compare this against another file (fileB.txt)... (3 Replies)
Discussion started by: genehunter
3 Replies

9. Shell Programming and Scripting

Array elements comparison using perl

Experts, I am looking to compare elements of 2 array using perl. Below is not the actual code but logic wise something like this. my $version = "MYSQlcl-5.2.4-264.x86_64"; <-- split this word into array as (5 2 4 264) ( which is to extract only the version number from the package name) my... (1 Reply)
Discussion started by: solaix14
1 Replies

10. Shell Programming and Scripting

File Comparison

HI, I have two files and contains many Fields with | (pipe) delimitor, wanted to compare both the files and get only unmatched perticular fields. this i wanted to use in shell scriting. ex: first.txt 111 |abc| 230| hbc231 |bbb |210 |bbd405 |ghc |555 |cgv second.txt 111 |abc |230 |hbc231... (1 Reply)
Discussion started by: prawinmca
1 Replies
DH_PERL(1)                                                           Debhelper                                                          DH_PERL(1)

NAME
dh_perl - calculates Perl dependencies and cleans up after MakeMaker SYNOPSIS
dh_perl [debhelperoptions] [-d] [librarydirs...] DESCRIPTION
dh_perl is a debhelper program that is responsible for generating the ${perl:Depends} substitutions and adding them to substvars files. The program will look at Perl scripts and modules in your package, and will use this information to generate a dependency on perl or perlapi. The dependency will be substituted into your package's control file wherever you place the token ${perl:Depends}. dh_perl also cleans up empty directories that MakeMaker can generate when installing Perl modules. OPTIONS
-d In some specific cases you may want to depend on perl-base rather than the full perl package. If so, you can pass the -d option to make dh_perl generate a dependency on the correct base package. This is only necessary for some packages that are included in the base system. Note that this flag may cause no dependency on perl-base to be generated at all. perl-base is Essential, so its dependency can be left out, unless a versioned dependency is needed. -V By default, scripts and architecture independent modules don't depend on any specific version of perl. The -V option causes the current version of the perl (or perl-base with -d) package to be specified. library dirs If your package installs Perl modules in non-standard directories, you can make dh_perl check those directories by passing their names on the command line. It will only check the vendorlib and vendorarch directories by default. CONFORMS TO
Debian policy, version 3.8.3 Perl policy, version 1.20 SEE ALSO
debhelper(7) This program is a part of debhelper. AUTHOR
Brendan O'Dea <bod@debian.org> 11.1.6ubuntu2 2018-05-10 DH_PERL(1)
All times are GMT -4. The time now is 11:33 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy