The 'Chinook' DB - testing with Perl