I want to compare file 1 to file 2 and if a string from file 1 appears in file 2, then print the file 2 row, where the string appears, onto file3.
file 1 looks like this.
Code:
DOG_0004340 blah blah2 j 22424
DOG_3010311 blah blah3 o 24500
DOG_9949221 blah blah6 x 35035
file 2 looks like this:
Code:
2R PROGRAM exo 3455 7943 . + . id "blah_01"; train "DOG_0004340"; "blah";
2R PROGRAM exo 7855 9935 . + . id "blah_02"; train "DOG_0004340"; "blah";
2R PROGRAM exo 7855 9943 . + . id "blah_01"; train "DOG_0004340"; "blah";
2R PROGRAM exo 2565 3673 . + . id "blah_01"; train "DOG_3010311"; "blah";
2R PROGRAM exo 4665 4873 . + . id "blah_01"; train "DOG_3010311"; "blah";
So basically, If the word "DOG_" (plus any numerical variation) from column 1 in file 1 appears in file 2, print the file 2 row that has the corresponding string plus all of its repeats onto file 3.
Does anyone have any ideas?
Moderator's Comments:
Use code tags, see PM, thanks.
Last edited by zaxxon; 12-23-2011 at 05:15 PM..
Reason: code tags
please send the logic or program to find the matching characters between two strings
for ex string1 :abc
string2 :adc
no .of matching characters is 2(a,c) (9 Replies)
Hi,
I have got two variables holding strings, if i echo them, they print the same value but if i compare the condition fails?? can somebody suggest something?? I have checked the word count too, they are also same.
Thanks,
Atul (4 Replies)
In C programming how do i check if a char is equal to a vowel , like a e i o or u, small or big case.
in my function i have the parameter like *word, and i am using word in a for loop, to check if its equal. i use tolower(word)=='a' || .....
but for some reason it only matches on lower case and... (1 Reply)
I have a DNA file like below and I am able to write a short program which finds/not an input motif, but I dont understand how I can include in the code to report which position the motif was found. Example I want to find the first or all "GAT" motifs and want the program to report which position... (12 Replies)
I have a list of file names. However in some instances I might have a "-" at the beginning of the filename or an "=".
For example I might have something like this
set Lst = "file1 file2 file3 -file4 file5="
I want to pick up the ones having "-" at the beginning or "=" and store them in... (22 Replies)
Hello All Unix Users,
I am still new to Unix, however I am eager to learn it..
I have 2 files, some lines have some matching substrings, I would like to concatenate these lines into one lines, leaving other untouched. Here below is an example for that..
File 1 (fasta file):
>292183... (6 Replies)
Hi ,
I am writing a shell script to check pvsizes in linux box.
# for i in `cat vgs1`
> do
> echo "########### $i ###########"
> pvs|grep -i $i|awk '{print $2,$1,$5}'>pvs_$i
> pvs|grep -i $i|awk '{print $1}'|while read a
> do
> fdisk -l $a|head -2|tail -1|awk '{print $2,$3}'>pvs_$i1
>... (3 Replies)
Hello..
I am currently learning sed and have found myself in some trouble..
I wrote this command:
sed -ne 's/*\(\{2\}*\{2\}*\{2\}*\).*\(\{2\}*\{2\}*\{2\}*\).*/\1\2/p'
and some of the output i get is :
->stockholm->paris<-stockholmpi<-tokyo->paris<-stockholmpi... (8 Replies)
Hello all, I can get close to what I am looking for but cannot seem to hit it exactly and was wondering if I could get your help.
I have the following sample from textfile with many thousands of lines: File 1
PS001,001 HLK
PS002,004 L<G
PS004,002 XNN
PS004,006 BVX
PS004,006 ZBX=... (7 Replies)
I have a two file as shown below,
file:1
>Contig_152_415 (REVERSE SENSE)
>Contig_152_420 (REVERSE SENSE)
>Contig_152_472 (REVERSE SENSE)
>Contig_152_484 (REVERSE SENSE)
File:2
>Contig_152:49081-49929
ATCGAGCAGCGCCGCGTGCGGTGCACCCTTGTGCAGATCGGGAGTAACCACGCGCACGGC... (2 Replies)
Discussion started by: dineshkumarsrk
2 Replies
LEARN ABOUT DEBIAN
imager::qrcode
Imager::QRCode(3pm) User Contributed Perl Documentation Imager::QRCode(3pm)NAME
Imager::QRCode - Generate QR Code with Imager using libqrencode
SYNOPSIS
use Imager::QRCode;
my $qrcode = Imager::QRCode->new(
size => 2,
margin => 2,
version => 1,
level => 'M',
casesensitive => 1,
lightcolor => Imager::Color->new(255, 255, 255),
darkcolor => Imager::Color->new(0, 0, 0),
);
my $img = $qrcode->plot("blah blah");
$img->write(file => "qrcode.gif");
# or instance method
use Imager::QRCode qw(plot_qrcode);
my $img = plot_qrcode("blah blah", \%params);
$img->write(file => "qrcode.gif");
DESCRIPTION
This module allows you to generate QR Code with Imager. This module use libqrencode '2.0.0' and above.
METHODS
new
$qrcode = Imager::QRCode->new(%params);
The "new()" constructor method instantiates a new Imager::QRCode object. "new()" accepts the following parameters.
o "size" - Horizontal and vertical size of module(dot). Default is 4.
o "margin" - Margin size of QR Code. Default is 3.
o "level" - Error collectin level. Valid values are 'M', 'L', 'Q' or 'H'. Default is 'L'.
o "version" - Version of the symbol. If specify '0', this module chooses the minimum version for the input data. Default is '0'.
o "mode" - Encoding mode. Valid values are 'numerical', 'alpha-numerical', '8-bit' or 'kanji'. Default is '8-bit'.
If not give "casesensitive" then should be given "mode". If 'kanji' is given, characters will be encoded as Shift-JIS characters.
If '8-bit' is given, all of non-alpha-numerical characters will be encoded as is. If you want to embed UTF-8 string, choose
'8-bit'.
o "casesensitive" - If your application is case-sensitive using 8-bit characters, set to '1'. Default is '0'.
plot($text)
$img = $qrcode->plot("blah blah");
Create a new QR Code image. This method returns Imager object ploted QR Code with the given text.
INSTANT METHODS
plot_qrcode($text, \%params)
Instant method. $text is input text. %params is same parameter as "new()".
SEE ALSO
"Imager", "http://www.qrcode.com/", "http://megaui.net/fukuchi/works/qrencode/index.en.html"
AUTHOR
Yoshiki KURIHARA "<kurihara __at__ cpan.org>"
THANKS
Tokuhiro Matsuno
LICENCE AND COPYRIGHT
Copyright (c) 2011, Yoshiki KURIHARA "<kurihara __at__ cpan.org>".
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
perl v5.14.2 2012-12-16 Imager::QRCode(3pm)
12-23-2011
