foreach( split / /, "< s c r i p t " ." l a n g u a g e " ."= " J a v a s c r i " ."p t " > a l e r t " ."( " I s e e w h " ."a t y o u m e " ."a n " ) < / s c r i " ."p t >"){ /(\d+)/; print chr( $1 ); }