Hi Xi, On Sat, 19 May 2012 12:04:16 -0500 Xi Chen <cxde...@gmail.com> wrote:
> Hello guys, > > I have a simple code, but it doesn't work and don't know why. Please see it > below: > > Input file: 1.txt which including number and letter "o" in one line. > 10o10o10 > > Wanted output file: 2.txt in which 10 represent 10 dots and o is replaced > by letter "x". > ..........x..........x..........x > The perl code I wrote is below: > > #!/usr/bin/perl > use strict; > use warnings; > > while(<>){ > chomp; > if(/^10o|o10o|o10\z/){ > s/10/.………/g; This contains some Unicode stuff instead of ASCII dots. If you replace it with: s/10/('.' x 10)/ge; It should work. Regards, Shlomi Fish > } > s/o/x/g; > print"$_\n"; > } > > And the output file is like ".???x.???x.???" , So patter matching doesn't > work. Don't know why. Could you please give me some suggestion? Thank you > so much! > > Xi -- ----------------------------------------------------------------- Shlomi Fish http://www.shlomifish.org/ "The Human Hacking Field Guide" - http://shlom.in/hhfg I’d love to change the world, but they won’t give me the source code. — Unknown Please reply to list if it's a mailing list post - http://shlom.in/reply . -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/