Help for this page
for ($a=0; $a<3; $a++) { $line[$count] =~ s/(href\s*=\s*(["'])[^"'#]*?#[^"']*?)\2(.*\2 +\s*>)/$1$3/isgc; }