Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: Extract line, matching more than one variable

by prasadbabu (Prior)
on Nov 12, 2008 at 12:20 UTC ( #723130=note: print w/ replies, xml ) Need Help??


in reply to Extract line, matching more than one variable

Hi yads25,

Welcome to the Monastery! Make yourself at home.

To accomplish your task, go through perlopentut and perlre. Try some code and if you have any questions, you can come again here.

Prasad


Comment on Re: Extract line, matching more than one variable
Re^2: Extract line, matching more than one variable
by yads25 (Initiate) on Nov 13, 2008 at 06:38 UTC
    Hi I tried the code....need debuging could you pl help..thank you.
    #!/usr/bin/perl -w $sasa_file= 'File1'; $pdbfile='File2'; # Remove the newline from the DNA filename open (MYXFILE,$sasa_file); open (PDBFILE, $pdbfile); while (<MYXFILE>){ chomp; @sa = split(/\t/,$_); #print "$sa[0] $sa[1] $sa[2]\n"; #$res = substr $_, 0, 4; #$res_no = substr $_, 4, 5; #$atom =substr $_, 9, 3; while (<PDBFILE>){ chomp; $res = substr $_, 17, 3; $res_no = substr $_, 22, 4; $atom =substr $_, 13, 3; #print " $res $res_no $atom \n" ; # works fine if (( $sa[0]eq$res)&&($sa[1]==$res_no)&&($sa[2] eq $atom)) { print "$_"; # does not print anything. } } } close MYXFILE; close PDBFILE;

      Hi yads25,

      Please use <code> tags to wrap the coding parts in your nodes.

      Can you please show us your sample file, so that we can give solutions without assumption.

      Prasad

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://723130]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (7)
As of 2014-07-11 06:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (220 votes), past polls