Help for this page

Select Code to Download


  1. or download this
    $schds{ lc( ( split( /\s+/, $_ ) )[0] ) } = 1 while <MILF>;