Create check_dois.pl

Checking DOIs (just a start)