dear friends i'm in work place and i'm facing a problem of replacing an ascii 
character with some other ascii character i cut the ascii character from my word 
document and pasted it in my pear programme but the result is not as i expected. plese 
give me answer with simple codeing and also say me how to use word file as input file. 
my coding is as below

@a=<>;
$ln=join('',@a);
$t= $ARGV;
print "$t\n";
$ln=~s/
file://gis;

$ln=~s/'/,/gis;
$ln=~s/[]//gis;
$ln=~s/[cr]//gis;
$ln=~s/[abc]//gis;
$ln=~s/_/_/gis;
$ln=~s//+/gis;
$ln=~s//^/gis;
$ln=~s/%/%/gis;
$ln=~s/</</gis;
$ln=~s/'/'/gis;
$ln=~s/'/'/gis;
$ln=~s/"/"/gis;
$ln=~s/"/"/gis;
$ln=~s/o//gis;
$ln=~s/-/--/gis;
$ln=~s/-/----/gis;
$ln=~s//~/gis;
$ln=~s/>/>/gis;
print $ln;
open (H, ">$ARGV");
print H $ln;


Catch all the cricket action. Download Yahoo! Score tracker

Reply via email to