by using this code i get the right answer, but i want to store the pattern in the 
variable and use it, for pattern, it fails. what is the problem. is it related to 
priority of operator.

open(IH, "<st.htm");
@a=(<IH>);
$v=join(' ',@a);
while($v=~m/href=\"(.*?)\"><IMG.*?border=0>/gi)
{
print "\n<br>$1";
print 1;
}

***********************

i want to change line number 4 

while($v=~m/href=\"(.*?)\"><IMG.*?border=0>/gi)
with,

$t="href=\"(.*?)\"><IMG.*?border=0>";

with

while($v=~m/$t/gi)

Catch all the cricket action. Download Yahoo! Score tracker

Reply via email to