while (my $line = <FILE>) {
        $line =~ s/$curUrl/$tarUrl/g;
    }