\n"; foreach($files as $file) { $name=strip_ext("$file"); print "\n
  • $name
  • "; } print "\n\n"; } } // SJW 2014.02.09 // Sanitize form data (for membership form, or in general) function qufa_sanitize_form_data($form_data) { $sanitized_data = $form_data; $sanitized_data = trim($sanitized_data); $sanitized_data = strip_tags($sanitized_data); $sanitized_data = htmlentities($sanitized_data); $sanitized_data = filter_var($sanitized_data, FILTER_SANITIZE_STRING); return $sanitized_data; } // Sanitize an entire array function qufa_sanitize_form_data_array($form_data_array) { $sanitized_form_data_array = array(); foreach($form_data_array as $key => $value) { $sanitized_form_data_array[$key] = qufa_sanitize_form_data($value); } return $sanitized_form_data_array; } // Generate a random string for spam check function qufa_generate_random_string($str_length = -1) { $character_array = str_split("ABCDEFGHIJKLMNOPQURTUVWXYZabcdefghijklmnopqrstuvwxyz"); $character_array_size = count($character_array); $random_string_size = $str_length; $random_string = ''; shuffle($character_array); if (($random_string_size < 0) || ($random_string_size >= $character_array_size)) { $random_string_size = $character_array_size - 1; } $random_string = array_slice($character_array, 0, $random_string_size); return implode('', $random_string); } function qufa_check_spelling($phrase_to_check) { $phrase_array = explode(" ", $phrase_to_check); $pspell_link = pspell_new("en"); if (! $pspell_link) { return true; } $spelled_ok = 0; $spelled_wrong = 0; foreach ($phrase_array as $word) { if (pspell_check($pspell_link, $word)) { $spelled_ok++; } else { $spelled_wrong++; } } return ($spelled_ok > $spelled_wrong); } ?> QUFA - How To Give To Queen's

    How To Give To Queen's

    Opportunities for giving to Queen's include donating towards new facilities, endowed Chairs and Professorships, student assistance, Faculty priorities, the Queen's Annual Fund or to the designated area/Unit of your choice. For more information go to:

    http://www.queensu.ca/giving/giftopportunities.html

    You can donate a one-time gift to Queen's by cheque or electronically by credit card at www.givetoqueens.ca. You may also choose to give monthly through payroll deduction For more information on how to give go to:

    http://www.queensu.ca/giving/ways/communityappeal.html

    Or contact Glenn Best, ext. 75137

    2009.04.27