Help for this page

Select Code to Download


  1. or download this
    $tainted =~ s/\W//g;  # remove all non word characters
if ($tainted =~ /\A([a-zA-Z0-9]{1,16})\z/i)
  2. or download this
    if( $tainted =~ /\A ( \w{1,16} ) \z/x ) {