"this is the one which i wrote by myself if its wrong plz letme knw"
I'm sure if you ran your script you'd see it was wrong, in the sense that it doesn't work. Here is an example which does what I think you are trying to do:
#!/usr/bin/perl
use strict;
use warnings;
my $word1 = 'Hcr1fa.fa'; # you missed the ;
if ( $word1 eq "chr1.subst.fa" ){ # I added quotes
print "$word1\n";
} elsif ( $word1 eq "Hcr1fa.fa" ) {
print "$word1\n"
}
Now I'm sure you know what you're trying to achieve with your code, I don't. My code prints the value of $word1 if the value is "chr1.subst.fa" or "Hcr1fa.fa". You'll see from the code and the comments that I added quotes around chr1.subst.fa, are you expecting this string or are you trying to match something else?
When you previewed your post, you must have seen that something was wrong with the formatting. Your closing code tag should be </code> rather than <\code>.
Here are some links I think you should read and understand:
|