<?php

/* This work is published under Creative Commons Attribution license. See http://creativecommons.org/licenses/by/3.0/ for the actual license. A proper attribution to the author (Leontius Adhika Pradhana) and the website http://leapon.net/ must be provided. */

/*
// This is the former script I used to generate the drug list according to WHO essential drugs list from Wikipedia. Then I realised that the resulting list was not what I expected and drugs.com has a better list.
$s = file_get_contents('wiki-essential-med-filtered.html');
//print($s);
preg_match_all('#\<a href="/wiki/([^"]+)"[^>]*\>#', $s, $m);
$ar = array_unique($m[1]);
sort($ar);
print("array('" . implode($ar, "', '") . "')");
*/

$ar = array(
    'Abilify',
    'Accutane',
    'Actiq',
    'Actonel',
    'Adderall',
    'Adipex',
    'Advair',
    'Alimta',
    'Allegra',
    'Alli',
    'Ambien',
    'Amitiza',
    'Aricept',
    'Avandia',
    'Avodart',
    'Boniva',
    'Botox',
    'Byetta',
    'Caduet',
    'Celebrex',
    'Celexa',
    'Chantix',
    'Cialis',
    'Claritin',
    'Coumadin ',
    'Crestor',
    'cyclobenzaprine',
    'Cymbalta',
    'Diovan',
    'Effexor',
    'Emend',
    'Enbrel',
    'ephedrine',
    'Femara',
    'fish oil',
    'Flomax',
    'folic acid',
    'Fosamax',
    'gabapentin',
    'Gardasil',
    'Geodon',
    'Hoodia',
    'Humira',
    'hydrocodone',
    'Insulin',
    'Juvederm',
    'Keppra',
    'Lamictal',
    'Lasix',
    'Levaquin',
    'Levitra',
    'Lexapro',
    'Lipitor',
    'lisinopril',
    'lithium',
    'Lotrel',
    'Lunesta',
    'Lyrica',
    'Melatonin',
    'metformin',
    'methadone',
    'methotrexate',
    'Mirapex',
    'Mirena',
    'Namenda',
    'naproxen',
    'Nasonex',
    'Neurontin',
    'Nexium',
    'niacin',
    'Norco',
    'Norvasc',
    'omeprazole',
    'Orencia',
    'Ortho Evra',
    'oseltamivir',
    'oxycodone',
    'oxycontin',
    'Paxil',
    'Percocet',
    'phentermine',
    'Plan B',
    'Plavix',
    'prednisone',
    'Prevacid',
    'Prilosec',
    'promethazine',
    'Propecia',
    'Protonix',
    'Provigil',
    'Prozac',
    'Pulmicort ',
    'Restylane',
    'Rogaine',
    'Seroquel',
    'simvastatin',
    'Singulair',
    'Soma',
    'Spiriva',
    'Suboxone',
    'Synvisc',
    'Tamiflu',
    'tamoxifen',
    'Taxol',
    'testosterone',
    'thyroid',
    'Topamax',
    'tramadol',
    'trazodone',
    'Ultram',
    'Valtrex',
    'Viagra',
    'Vicodin',
    'Vioxx',
    'Vytorin',
    'Wellbutrin',
    'Xanax',
    'Xenical',
    'Yasmin',
    'Yaz',
    'Zelnorm',
    'Zetia',
    'Zocor',
    'Zoloft',
    'Zyprexa',
    'Zyrtec',
);


//create random seed that is reset every day on Singapore timezone
date_default_timezone_set('Asia/Singapore');
$seed = strtotime('today');
mt_srand($seed);

header('Location: http://en.wikipedia.org/wiki/' . $ar[mt_rand() % count($ar)]);