Help for this page

Select Code to Download


  1. or download this
    if( $var eq ' ' x length($var) ) {...}
  2. or download this
    if( $var eq map tr/A..Za..z0..9/ /, $var ) {..}
  3. or download this
    if( $var eq map tr/\000..\277/ /, $var ) {..}
  4. or download this
    if($var  eq join '', map{ tr/\000..\177/ /c; $_; }  split '', $var ) {
+...}