open(FILE,"out1.txt") or die $!; while(<FILE>) { $_=~s/\s*//g; push(@array,$_); } $array=join('',@array); @array=split(/http|html/,$array); foreach (@array){ if($_=~/www/){print "http$_"."html\n";} }
In reply to Re: Continue reading regex to next line
by boby
in thread Continue reading regex to next line
by learningperl01
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |