The following should also do the trick if you don't want to import constants you don't use:

use DBD::SQLite::Constants qw( SQLITE_OPEN_READONLY );
[download]