Help for this page

Select Code to Download


  1. or download this
    $new_word = join "", map { $_ =~ /[a-zA-Z]/ ? "[$_]" : $_ } split "", 
    +$word;