Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. The s metasymbol and whitespace
while(){
    print if s/\s/*/g; # Substitute all spaces with stars
}
__DATA__
    A 101
    A A A