|
|||||||||
|
|||||||||
| |||||||||
|
|||||||||
|
|||||||||
| |||||||||
|
|
|
| |||||||||
 |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread | Rate Thread | Display Modes |
Dev Shed Forums Sponsor:
|
|
|
|
#1
July 23rd, 2001, 12:23 AM
|
|||
|
|||
|
open file find and replace
was wondering where i could find info on opening afile finding text and then replacing it with a variable in
Thank you in advance Wicked-
|
|
#2
July 23rd, 2001, 07:39 AM
|
|||
|
|||
How about this....
I believe this will do it:
Code:
open (INFILE, "</path/filename") or die "Cannot open filename for input: $!";
while (<INFILE>) {
s/oldtext/$newtext/g;
$replace .= $_;
}
close INFILE or die "Cannot close filename: $!";
open (OUTFILE, ">/path/filename") or die "Cannot open filename for output: $!";
print OUTFILE $replace;
close OUTFILE or die "Cannot close filename: $!";
|
|
| Viewing: Dev Shed Forums > Programming Languages > Perl Programming > open file find and replace |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
 |
|
|
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
