Hi,
I am trying to remove from file :
1. all characters but any alphabet and numbers.
2. all trailing spaces should be made to one space.
following code doesnt seem to work for objective [1] mentioned above. Can anyone
please point out why ?
Thanks,
Mandar
---
open(fp,$file) or die "Cant open $file :$!\n";
@cont=<fp>;
[EMAIL PROTECTED];
for(@cont) {
tr/A-Z/a-z/;
s/^[a-z0-9]/ /;
s/\s+/ /g;
}
---
-------------------
Mandar Rahurkar
ECE, UIUC
-------------------
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
