Shell Programming and Scripting

Hi

I have a file

name1 xxxxx
name1 xxxxx
name1 yyyyy
name 1 zzzzz
name1 Uniprot Id 1234
name2 sssss
name2 eeeee
name2 bengamine
name2 Uniprot Id 3456
......................and so on

I have to capture Uniprot IDs only in a separate file so that output contain only

Uniprot ID for name 1
Uniprot ID for name 2............... and so on

Can any body help to write a perl programm for this.

My another questions is regarding compare 2 files:

one file
Uniprot ID 1(any number)
Unipro ID 6
Unirot ID 7
.......so on randomly
another file contains

Uniprot ID1
Uniprot ID2
Uniprot ID 6
Uniprot ID8
..so on

I have to compare 2 files to find which and hw many entries are and common in both files and if these are common than print before entry common other wise not common.

Please let me know Perl programm for these question... highly thankful fo r somebody..indeed

Thanks
Mani

Possibly something like this:

Code:

cat yourfile | perl -n -e 'chomp; if(m/^\s*(\D+)\s*(\d+)\s+Uniprot Id\s+(\d+)/){printf("%s for %s %s\n",$3,$1,$2)}' > outfile

Thanks for the reply. I m receiving followin error:

Unquoted string "perl" may clash with future reserved word at test.pl line 3.
syntax error at test.pl line 3, near "n -e"
Execution of test.pl aborted due to compilation errors.

can anybody guide.

Are you using windows ?

when you are asking the question, mention the OS and shell

Hi Kamraj

I am using Unix OS with Unix shell

can you post your command

Hi

My programm is in a file named test.pl


#!/usr/bin/perl -w

cat TTDtargets | perl -n -e 'chomp; if(m/^\s*(\D+)\s*(\d+)\s+Uniprot ID\s+(\d+)/){printf("%s for %s %s\n",$3,$1,$2)}'> TTD2;

END


my command and error is :



bash-3.2$ perl test.pl
Unquoted string "perl" may clash with future reserved word at test.pl line 3.
syntax error at test.pl line 3, near "n-e "
Execution of test.pl aborted due to compilation errors.

---------- Post updated at 01:20 AM ---------- Previous update was at 01:19 AM ----------

Here input file name is TTD Targets and outut file name is TTD2